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NAVIGATION IN A HIERARCHICAL STRUCTURED 
TRANSACTION PROCESSING SYSTEM 

FIELD OF THE INVENTION 

The present invention relates to information processing and, more particularly, computer 
based transaction processing. 

NOTICE OF COPYRIGHT RIGHTS 

A portion of the disclosure of this patent document, particularly the Appendix, contains 
material that is protected by copyright. The copyright owner has no objection to the facsimile 
reproduction of the patent document or the patent disclosure as it appears in the Patent and 
Trademark Office file or records, but otherwise reserves all copyright rights whatsoever. 

BACKGROUND OF THE INVENTION 

In everyday life, networks of choices set forth in a particular order or hierarchy are 
encountered with increasing frequency. Usually, it is desired to traverse the network in the most 
efficient manner possible to accomplish a particular goal. 

In modem mathematics, graph theory is used to study networks of hierarchical choices. 
The hierarchical networks can be represented as a graph structure. Graph theory finds practical 
applications in chemistry, computer science, economics, electronics and Hnguistics. 

A graph structure is a collection of points, called "vertices", and a collection of lines, 
called "edges". Each edge joins a pair of vertices or a single point to itself. 

A simple example of a network represented by a graph structure is a road map. The 
vertices represent towns or cities. The edges represent the roads that connect the towns and 
cities. 
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Another type of network familiar to anyone who has a telephone is an automated 
telephone voice response system, such as commonly utilized by many large companies, to direct 
incoming calls to particular individuals or departments or to assist the caller in performing a 
transaction, such as making a purchase. 

That type of telephone network can also be represented as a graph structure. When the 
system answers an incoming call, it transmits a verbal description or prompt to the caller: "If 
you would like to speak to Harry, press 1 ; if you would like to speak to Fred, press 2". (In 
general, we will use "verbal description" to mean a set of words relating to the subject matter 
whether presented audibly or in written form. The verbal descriptions may range from a few 
words to an entire document worth of text). A first vertex on the graph represents the initial 
prompt, which a caller hears upon reaching the telephone response system. If the user's response 
is pressing 1, calls are directed along a first edge to Harry, represented by a second vertex. If the 
response is pressing 2, the call is directed along a second edge to Fred, represented by a third 
vertex. Then, if the chosen person is not available, the caller is asked whether the caller wishes 
to leave a message. If the response is positive, the caller is directed along another edge to the 
selected person's voice mail, which would be represented by another vertex of the graph. 

In general, whether for a telephone response network or for any other application 
representable by a graph structure, the caller or user of the system will have some goal. By 
"goal" we mean a combination of transactions and information accesses which the user seeks to 
accomplish. By "transaction" we mean an operation performed electronically with a user. In 
general, there will also be a combination of vertices or nodes in the graph that best represent or 
are closest to the goal the user is trying to accomplish. We call these vertices the "goal vertices". 
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For the user, the object in navigating the graph is to get from the first vertex to the goal 

vertices. If this is not done as quickly and efficiently as possible the user may become frustrated 

and give up. Moreover, as the number of possible choices or nodes in the network becomes 

larger, the number of possible pathways between the first vertex and the goal vertices multiplies 

rapidly. Therefore, the ability to reach the goal vertex can become more difficult, require 

navigation of an excessive number of choices or nodes, or discourage a user before the goal 

vertex is even reached. 

SUMMARY OF THE INVENTION 

The present invention creates a method for navigating efficiently and naturally through a 
series of choices to obtain information, perform transactions, or accompUsh some similar goal. 
The invention is implemented in a programmed computer that has a hierarchically configured 
decisional network that must be navigated as part of the processing and is constructed to accept 
inputs or data and process them in a manner that facilitates navigation of the network vertices 
more efficiently. 

BRIEF DESCRIPTION OF THE DRAWINGS 
FIG. 1 is an example graph representing a simple, generic hierarchically arranged 

transaction processing or decisional system suitable for use with the invention; 

FIG. 2 is an example portion of a graph used to illustrate jumping among nodes in 

accordance with one variant of the invention; 

FIG. 3 is an example portion of a graph in a simple interactive voice response ("IVR") 

system used to illustrate grouping in accordance with one variant of the invention; 



728851 vl 



3 



PATENT 
Docket No.: 4428-4001 

FIG. 4 is an example portion of a graph in a simple interactive television program listing 
used to illustrate another variant of the invention; 

FIG. 5 is an example portion of a graph in a simple geographic information system used 
to illustrate a further variant of the invention; 

FIG. 6 is an example portion of a graph for a simple automated voice response system 
used to illustrate a more complex variant of the invention; 

FIGS. 7A, 7B, and 8-10 are collectively a flowchart illustrating an example setup process 
for use in accordance with an example implementation of one variant of the present invention; 
and 

FIGS. 1 1-14 are collectively an overall flowchart illustrating an example process in 
accordance with a further variant of the present invention. 

DETAILED DESCRIPTION 

In graph theory, mathematicians refer to a "path" from one vertex in a graph to another 
specified vertex in the graph as consisting of a sequence of edges that connect the vertices 
between the first vertex and the final vertex. If the path contains an edge sequence that is 
"closed", meaning that it loops back on itself, the path is called a "circuit" or a "cycle". A graph 
structure is considered to be "connected" if there is at least one path connecting every pair of 
vertices. 

Our invention is particularly applicable to transactional processing as applied to 
instances where graph theory can be used to represent the transactions as a set of options and 
when the options are structured according to a connected graph that contains no circuits. We call 
such a graph a "tree". We use the term "menu tree" for a network that provides a "menu" of 
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options, typically presented as verbal descriptions, to assist a user in making a series of choices 
through which he or she is able to accomplish one or more of his or her information access or 
transaction goals. Informally, a "menu tree" can be regarded as a series of vertices in a hierarchy 
or ordered pattern, arranged in rows of increasing numbers of vertices. More precisely, a "menu 
tree" can be represented as a "tree" in which (i) the vertices are all the options provided 
anywhere in the "menu tree", plus a first vertex, (ii) every vertex except the first vertex, i.e., 
every "option vertex", is associated with the verbal description (or such other means) by which a 
"menu" presents that option, (iii) an edge connects the first vertex to each vertex that the first 
"menu" presents to the user as an option, and (iv) each other vertex is similarly connected by 
edges to every other vertex that the corresponding "menu" presents to the user as an option. As 
the number of options increases, so does the length of paths fi-om the first vertex to goal vertices. 

In overview, in accordance with the teachings of our invention, the user can navigate the 
graph or tree in a way that allows them to skip fi:om one vertex to another vertex that may be 
many rows down the graph or tree and/or where the vertices may not be connected together by 
an edge. This eliminates the necessity for making many choices. 

Particular implementations make it possible to jump laterally firom one vertex to another 
if the navigation enters a wrong branch of the tree or if the user changes his goal. The approach 
is accomplished through associating each vertex with a verbal description (or prompt), and 
matching words in users' requests and responses with these verbal descriptions to enable the 
selection of vertices that may not be directly connected to tiie user's current location in the graph 
or tree by an edge. 
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In some variants, we create a system with the unique ability to learn by incorporating 

previously unknown words, keyword or synonyms of keywords so that the system modifies itself 

to thereby increase the hkelihood that a user will efficiently and quickly reach the goal. 

For purposes of illustration, the invention will be described by way of example, first 

using a series of simple examples followed by a more complex example of a more detailed and 

commercially suitable example variant, in the context of a menu-type automated telephone voice 

response system for a pubHcation, a hierarchical network of the type that is fi-equently 

encountered and easily understood that implements a combination of some of the features of the 

simple examples in order to illustrate how those features can be combined or overlayed. 

It should be understood that the present invention is applicable to a wide range of 
different networks, which can be mathematically represented by graph structures consisting of 
vertices and edges and should not be considered to be Umited to the particular application 
described. Representative examples of suitable apphcations for the invention include 
implementing an enhanced and more efficient "Find" function or file system browser for 
personal computer operating systems, a navigation system for television program listing, 
document management or retrieval systems, a "geographic information system" in an automobile 
that allows location of addresses or business(es) meeting certain criteria, or other devices that 
incorporate some hierarchical navigation aspect as part of its operation. 

In order to more fiiUy understand the invention, various independent aspects are now 
presented below by way of simple illustrative examples. In this manner the teachings of the 
invention can be understood in a way that makes it possible to use, overlay and/or combine those 
aspects in a beneficial manner in an implementation of the invention. Depending upon the 
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particular implementation of the invention, one or more of the aspects may be used together in 
various permutations and/or combinations, with the understanding that different permutations 
and/or combinations may be better suited for particular applications or have more or less benefits 
or advantages than others. 

The underlying scenario common to all these basic examples is that there is a hierarchical 
arrangement to the possible choices that can be illustrated in a form of "tree" structure. 

FIG. 1 is an example graph 100 representing a possible hierarchically arranged 
transaction processing or decisional system suitable for use with the invention. The individual 
boxes 102 - 120 are referred to as "nodes" and each represents a specific choice or option in the 
hierarchy. For purposes described in more detail below, each node is arbitrarily uniquely 
identified in some manner. In the example of FIG. 1, the individual nodes 102 - 120 are 
numbered 1 through 10 starting from the top node 102 in the hierarchy. 

Each "node" is associated with exactly one verbal description, for example in the case of 
an airline system, a verbal description relating to some aspect of the reservation process. Each 
such description contains "key" words that are deemed to be of importance and other words that 
can be disregarded. For example, one node may have the associated verbal description "Would 
you like to make a reservation?" hi this description, there is only one "key" word - 
"reservation" deemed important, so all of the other words in the description can be ignored. 

A level in the hierarchy below that one may be used to obtain fiirther narrowing 
information, for example, using the verbal description "Is the reservation for a domestic or 
international fiight?" In this description, the terms "domestic" and "international" are "key" 
words. Similarly, the word "flight" could be a "key" word, for example, for a system that 

7 

728851 vJ 



PATENT 
Docket No.: 4428-4001 

involves not only airline travel but also rail and/or cruise travel or it could be an "ignored" or 

stop word for a purely airline related system because it has minimal meaning in that context. 

Again, the other words can be ignored as well. 

The unique identification of each node allows the creation of a list of all the key words 

and their associated nodes so that, if a key word is duplicated in two or more nodes, it need only 

be listed once. For example, a hierarchical tree related to "pens" might have nodes for ball-point 

pens, fine point pens, medium point pens, fountain pens, felt-tip pens, quill pens, erasable pens, 

etc. By using this approach, one could list the keyword "point" once, but associate it with each 

of the nodes where that keyword appears by using the unique identifier for each node where the 

term appears. 

In this manner the keywords are obtained from the collection of available descriptions 

found in the particular application in which the invention will be used. In addition, each 

particular node where the keyword appears is associated with the keyword. Thus, with respect to 

the pen apphcation above, the keyword "point" might appear in nodes 2, 3, 6, 7, 13 and 15. 

Similarly, the keyword "erasable" might appear in nodes 3, 4, 5, 6 and 22. An index, as 

described more fully below, associating these keywords with the nodes containing them is then 

created, for example: 

point: 2, 3, 6, 7, 13,15 
erasable: 3, 4, 5, 22 

By making use of these associations the "tree" can be negotiated by allowing presentation 
of relevant verbal descriptions for the nodes associated with a term, irrespective of where in the 
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hierarchy they are, thereby causing a "jump" to a particular node without necessarily traversing 
the tree in the rigid hierarchical manner. 

Various examples will now be presented to illustrate certain concepts related to the 
invention. It should be understood that while these examples are presented in the context of 
things and likely experiences of ordinary people, the same approach can be applied to other 
forms of transaction processing including navigating through hierarchically nested data files in a 
computer system, pattem analysis or image processing, etc. the term "transaction" as used herein 
relating to traversal through a hierarchy to a goal, not mathematical calculation per se. 

Moreover, the specific formats used and presented in these examples are purely for 
illustration purposes. It should be understood that that other techniques for interrelating data, 
such as hash tables, direct or indirect indexing, etc. can be substituted in a straightforward 
manner. Thus, for example, the relationship between the word and a node could be configured 
such that the location of the word in a list as the "n-th" item could be used as an index into 
another list containing the nodes correlated to the Ust. A similar approach could be used for the 
thesaurus, the important aspect relative to the invention being the relationship among certain 
words and the node(s) in which they occur and, where applicable, the relationship between 
certain words and "synonyms" for those words, not the data structure or its form or format 
whereby that information is kept or maintained. 
Example 1 

Example 1 illustrates, in simplified form, how an index is used to jump among nodes 
with reference to FIG. 2. In this example, the hierarchical tree 200 represents a portion of a more 
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complex tree specifically involving possible decision relating to fruit and a decision between two 
specific types of fruits, an apple and an orange. 

In prior art hierarchical frees, navigation of this graph 200 would necessarily involve 
going through the "fruit" node 202 in order to reach the "apple" 204 or "orange" 206 nodes. As 
a result, assuming this simple free was part of a larger free for an on-line supermarket that 
prompted the user for what they wanted to purchase, the exchange would be both rigid and time 
consuming. For example, in response to a prompt "What do you want to purchase?" if the 
response was anything other than "fiiiit" traversal to the "fruit" node 202 could not occur. At the 
point in the tree that would lead to the "fruit" node 202, neither apple nor orange would be an 
acceptable response. 

In accordance with the invention, assuming the only relevant keywords for that portion of 
the tree were "fruit", "apple" and "orange", an inverted index would be created that includes an 
association of "Fruif ' with the top node 202, "Apple" with the bottom left node 204, and 
"Orange" with the bottom right node 206. As shown above, that association can be created using 
node identifiers, in this example, the node identifiers 1 AOl, 1A02 and 1 A03 are arbifrarily 
assigned and used. Thus, the information can be stored in a file, for example, as follows: 

Fruit, lAOl 
Apple, 1A02 
Orange, 1A03 

Accordingly, to navigate the system 200, when a response to a verbal description is 
provided by a user, possible keywords are identified in the response and used to search the index 
and identify any node to which the response may be directed, irrespective of the hierarchy. 
Thus, a user response of "an orange" to a verbal description located above the "fiiiit" node 202 in 
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the hierarchy, for example, "What would you like to buy today?" would cause the system to 

identify "orange" as a key word from the response, search the index, and directly identify node 

1 AOS (206) as the node whose verbal description should be presented next, thereby avoiding the 

need to traverse intervening nodes, for example, through the "fruit" node (202) 1 AOl, at all. 

This illustrates an example of a simple jump according to the invention. 

Example 2 

Having illustrated a simple "node jump" a more complex (and likely) scenario can be 

shown. In this example, the Example 1 graph of FIG. 2 applies, but relevant portion of the index 

is as follows: 

Fruit, lAOl 
Apple, 1 A02, 2F09 
Orange, 1A03 

As a result, there are two nodes relevant to the keyword "apple" one being the node 204 
in the portion of the graph shown in FIG. 2 and one in the node uniquely identified as 2F09 
located somewhere else in the hierarchy (not shown). 

In this example, a user response containing the keyword "apple" would identify nodes 
with identifiers 1 A02 and 2F09. In this case, and unlike the prior art, the verbal descriptions 
from both nodes would be presented to the user, likely in alternative fashion. Thus, if the user 
did not want an apple, they wanted apple cider, node 2F09 might be more appropriate because it 
is part of the "drinks" portion of the overall hierarchy. 

Thus, presenting the user with the verbal description from both nodes would likely result 
in a jump to the portion of the graph nearer to node 2F09 since it is closer to the user's goal 
thereby speeding up the process and avoiding potentially confiising or frustrating the user. 
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Example 3 

While the verbal descriptions associated with various nodes will generally be chosen to 
accurately represent the node, in accordance with certain variants of the invention, it is possible 
to create a situation where a user response takes them away from their ultimate desired goal. 
Nevertheless, by using the teachings of the present invention, the user can often still be brought 
to their goal quicker than possible with the prior art because the user need not rigidly trace 
through the hierarchy. This is accomplished by virtue of the "grouping" aspect inherent in some 
implementations of the invention. 

This example illustrates the "grouping" aspect using a simplified graph 300 representing 
a portion of an airline reservation system as shown in FIG. 3. 

In particular, the graph of FIG.3 can be thought of as part of a very simple interactive 
voice response ("IVR") system. 

As described above, each node is uniquely identified, for example, by the numbers 1 
through 7 and the identified terms "Reservation", "Domestic", "International", "Business Class", 
"Economy Class" are deemed the relevant keywords. Note, there is no requirement for a the 
"keyword" to be a single word, in some implementations, keywords could be single words, 
phrases of two or more words, or even some other form of information like a specific data 
pattern. 

Again, an inverted index is created as described above associating those keywords with 
the nodes, in this case: 

Reservation, 1 
Domestic, 2 
International, 3 
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Business Class, 4, 6 
Economy Class, 5, 7 

Assuming that the top node is assigned the number 1, its two child nodes (Domestic and 
International) are assigned the numbers 2 and 3, and the grandchild nodes (i.e. at the lowest level 
in the hierarchy) have been assigned numbers 4, 5, 6, and 7 taken from left to right each node can 
be uniquely located. Note that the last two entries in the inverted index are each associated with 
two nodes, 4 and 6 in the first case, and 5 and 7 in the second. 

Using the above, the concept of grouping of nodes from different parts of the graph (i.e. 
nodes that are not siblings or nodes that do not have a common parent) can be explained. 

Presume that the response to a verbal description presented as an initial query of "What 
do you want to do?" was "Make a business class reservation." In this case there are two 
keywords present, "reservation" and "business class". 

Depending upon the particular implementation, as noted previously, the verbal 
descriptions associated with each identified node could be presented together or in sequence. 
AJtematively, and as is the case here, a set of rules can be established, for example, such that if 
an identified node is a sub-node of another identified node, only the verbal description of the 
sub-node(s) is provided because of inherent redundancy. Thus, since both "business class" 
nodes 310, 314 are sub-nodes of the "reservation" node 302, the verbal description associated 
with the "reservations" node can be suppressed if it can be determined that business class 
necessarily implies reservations. 

In this example, a search of the inverted index would identify nodes 4 and 6 (310, 314) 
from different parts of the tree are associated with the keywords in the query, and thus the 
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system, in presenting the verbal descriptions from each, in effect, alters the tree structure and 
groups these nodes in the result. Thus, the combination of result nodes presented depends upon 
the user query or response, not that predetermined by the graph structure itself 

Of course, the goal would still not be reached because of the ambiguity caused by 
"Business Class" being under both "Domestic" and "International". However, that ambiguity 
can be handled by suitable wording of the following verbal descriptions and whether they are 
combined or provided sequentially or by other nodes. 

Example 4 

A persistent and further drawback present in the prior art is the inability to operate if any 
term other than the specific allowed terms are provided. Thus, in an IVR of the prior art, 
providing anything other than the recognized term(s) will likely resuh in meaningless repeat of 
the same inquiry by the IVR or an error. 

Advantageously, the teachings of the present invention allow for construction of a more 
flexible system than available in the prior art. Specifically, we can incorporate a thesaurus to 
accommodate synonyms for the keywords. 

Example 4 illustrates the addition of a simple thesaurus as an aspect of a system so that a 
synonym of a keyword may also be used by the system to jump to the desired nodes in the graph. 
Example 4 is discussed with reference to a portion 400 of an interactive television program 
listing system as shown in FIG. 4. 

Such a system implementing the invention will allow a user to speak to or interact with a 
device to look for programs of his choice by time slot, genre, favorite actor or actress, etc. 
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This example, as with the other examples above, use an inverted index, in this case one 

where each node 402, 404, 406 is uniquely identified by a string of six characters, the portion of 

which corresponding to FIG. 4 is shown as follows. 

Programs; acgyct 
Sitcoms; ifgnxh 
Films; vnymos 

Since a common synonym for "Films" is "Movies" a thesaurus can be created associating 
the two. Depending upon the particular implementation, thesaurus terms to be equated to the 
keywords can be taken from a standard thesaurus or can be custom created for the particular 
application. In addition, the equating of terms can be done in any of a myriad of different ways, 
the exact implementation details of which however re irrelevant to the invention, but a few 
representative examples of which however are contained herein for purposes of illustration. 

In one example case, the equating can be done on a purely word basis. For example, a 
file can be constructed such that one or more single word synonyms are directly associated with 
an index word, for example as follows: 
Movies, Flicks - Films 

Alternatively, the synonyms can be equated with the node identifier(s) corresponding to 
the index term, for example as follows: 
Movies, Flicks - vnymos 

In the former case, the system would still have to search the index after the thesaurus has 
provided the proper index term(s). In the latter case, the thesaurus provides a direct link to the 
respective node(s) so that re-searching is not required. 
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In the system of Example 4, a user who provides the input "Movies" would cause the 

processing to occur as follows. 

The system would search the inverted index of keywords and fail to locate "Movies" as a 
keyword. As a result, it would search the thesaurus and find that the word "Movies" is a 
synonym that can be correlated with a keyword. At this point, depending upon the particular 
thesaurus, it would either return to the inverted index and search using the synonym keyword 
"Films" and return the result as the node 406 identified by "vnymos", or go directly to the node 
406 identified by "vnymos" based upon the thesaurus entry. 

Of course, it is possible (and likely) that in actual usage a synonym will be associated 
with more than one keyword. For example, "Comedies" may be associated with both the 
keywords "Sitcoms" and "Films", resulting in, for example, the following entry in a thesaurus: 

Comedies - Sitcoms, Films 

In this case, a search for "Comedies" would result in the system identifying that the 
synonym was associated with nodes 404, 406 for both "Sitcoms" and "Fibns", and it would 
return both terms or node identifiers corresponding to the two keywords as the result. 

Example 5 

Advantageously, the thesaurus concept can be extended fiirther so that an initially 
unknown word (i.e. a word that is neither a keyword nor a thesaurus word) can be learned by the 
system and added to a thesaurus for fiiture use. 

This example is described with reference to FIG. 5 which is a portion 500 of a larger 
system graph as part of a very simple "geographic information system" found in some 
automobiles, kiosks and elsewhere today. Such a system enables a user to, among other things, 
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identify and get information about different locations in an environment. For example, 
information about particular types of restaurants in an area. 

In this example, the inverted index for the portion 500 shown in FIG. 5 could look as 
follows: 

Restaurants, 1 
Pizza, 2 
Burgers, 3 
Chinese, 4 

A user issues the following query to the system "fast food" in order to find a quick meal. 

The system's search of both the index and thesaurus would result in the ''term", in this 
case a phrase, not being found in either. In this case, it is an unknown phrase, and the system has 
to leam the "meaning" of the term. 

To do this, the system first offers the verbal description from the top level node(s) 502 to 
the user - in this example, just "Restaurants". The user presumably provides a positive response. 
(Of course, in a real system, it is possible and likely there are more top level nodes than just one. 
In that case, the user would be offered two or more of these nodes, and would have to select 
"Restaurants" to match his intended request.) 

Continuing on, once the user has responded affirmatively, the system moves down the 
tree and offers the verbal description fi-om each of the child nodes: "Pizza" (504), "Burgers" 
(506), and "Chinese" (508). Presuming that the user picks "Pizza", the transaction interaction 
would look something like this: 
User: Fast food 
System: Restaurants? 
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User: Yes 

System: Pizza, Burgers, or Chinese? 
User: Pizza 

At this point, the system has "learned" for the time being that it can equate "fast food" 
with "pizza" and can add "fast food" as a synonym to "pizza" in the thesaurus. 

This user, who first used the unknown term "fast food", had to trace a path down the tree. 
However, now the system is able to associate "pizza" with "fast food" and create or add a 
thesaurus entry to reflect this association, for example as follows: 

Fast food - Pizza 

Thus, the system has leamed a meaning of the initially unknown term "fast food" and has 
added it to the thesaurus for future use. 

As a result, a subsequent uses of the same term "fast food" will enable the system to jump 

directly to the "pizza" node 504. 
Example 6 

This example illustrates how additional meanings for an existing thesaurus term or phrase 
can be leamed by the system for future use, whether the existing thesaurus term or phrase was an 
original thesaurus term or one previously leamed with continuing reference to FIG. 5. 

At this point, the inverted index is unchanged as: 

Restaurants, 1 
Pizza, 2 
Burgers, 3 
Chinese, 4 

Additionally, presume the following entry now exists in the thesaums. 
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Fast food - Pizza 

Suppose a new user now issues the query "fast food" as above, but with "Burgers" rather 
than "Pizza" in mind. 

Based upon the thesaurus, the system would go directly to the "Pizza" node. However, 
the user will reject "Pizza", having "burgers" in mind. By rejecting the "Pizza" node 504 
description, the user indicates that the "Pizza" node 504 is not of interest. The system is 
therefore configured with a further set of rules, in this case one in which the system goes up in 
the hierarchy to a higher node, the top node 502 in this portion of the example, and provides the 
verbal descriptions for the other nodes 502, 504, 506, 508 so as to cause a tracing down the tree. 
This can be illustrated by the following "dialog": 

User: Fast food 

System: Pizza? 

User: No 

System: Restaurants? 
User: Yes 

System: Pizza, Burgers, or Chinese? 
User: Burgers 

This time, although this user has had to trace through at least a portion of the path fi-om a 
higher-level node 502 of the tree 500, the system has learned yet another meaning for "fast 
food". It now adds this meaning to the earlier entry in the thesaurus, for example as: 

Fast food - Pizza, Burgers 
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It has now learned two meanings for future use. If a user were now to issue the query 
"Fast food", the system would respond with the verbal descriptions from the nodes 504, 506 
corresponding to both Pizza and Burgers. 

Thus, the system can keep leaming new meanings of terms based on the intended 
meanings of users "deduced" from the interactions between users and the system. 

Of course, the nature and extent to which the system will incorporate synonyms and/or 
keywords in a continual leaming process will not only depend upon its construction and rules, 
but also on the quality of the original thesaurus and the quality of the initial inverted index. In 
addition, where in the tree the system jumps if the user rejects the initial meaning(s) offered by 
the system can be handled different ways in different implementations. 

For example, the system can always jump to fixed ancestor(s) (either the top node or a 
parent or some ancestor(s) at an intermediate point) or a fixed level (e.g. halfway from the top). 
This approach has the advantage of being simple to implement, but it has the problem of 
inflexibility because it may be relatively efficient for certain graphs and associated verbal 
descriptions, but not for all. For example, if two or more nodes' verbal descriptions are offered 
and rejected, the relevant node selected would have to be common ancestor(s) of the offered 
nodes. In other words, with reference to Example 6 which is part of a larger tree, going up to the 
"Pvcstaurants" node 502 would mean going to the parent of the "Pizza" node 504 rather than all 
the way to the top in the larger tree containing the portion 500 shown. 

A more flexible alternative uses the information recorded in the thesaurus to find every 
synonym for "pizza" in the thesaurus and collect all the other keywords associated with those 
synonyms. Then the system would search the inverted index to identify all the nodes associated 
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with these other associated keywords and identify the most common ancestor of all of those 

nodes and go to it. By using the information in the thesaurus in this way the system makes use 

of known properties of the one meaning of "fast food", which is "Pizza", to construct an 

intelligent hypothesis about where the other meanings of "fast food" might lie in the graph. This 

allows the user to reach another meaning with the least effort and allows the system thereby to 

learn what the new meaning of "fast food" is more efficiently. 

Example 7 

Of course, just as it may be desirable to create implementations to add meanings to the 
thesaurus, it may be equally or more desirable to cause an existing meaning for a thesaurus word 
to be dropped, for example, due to relative lack of use. This process is described with continuing 
reference to FIG. 5 and the associated inverted index, particularly with respect to the thesaurus 
entry resulting from the most recent example. 

Fast food - Pizza, Burgers 

In this example, presume that there have been several uses of the query "fast food" and 
that the user(s) issuing these queries have aknost always selected "Burgers" and almost never 
"Pizza". 

In accordance with another implementation of the invention, the system is constructed to 
track the frequency of use of a particular term in the thesaurus. Depending upon the particular 
implementation, the tracking can be done for all entries in the thesaurus, for only those added as 
part of the "leaming" process, or for some specified combination thereof 

In addition, some specified criterion is used to determine when, and which terms, if any, 
should be removed from the thesaurus. Depending upon the particular implementation the 
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criterion can be based upon usage relative to time, usage of a particular term relative to some 

other term(s), term usage relative to overall thesaurus usage, or simply elimination of all added 

terms not used since the last purge. 

Thus, presuming that the system has kept track of the frequency of use of different 
meanings of "fast food", and that "Pizza" does not meet the criterion for a sufficiently high 
frequency, the meaning "Pizza" can be dropped as a synonym for "Fast food" and the entry (after 
purging) would look as follows: 

Fast food - Burgers 

Thus, a further enhanced implementation can be constructed so the system is dynamically 
updating the thesaurus, either adding meanings or dropping meanings for existing and/or initially 
unknown words. 

Example 8 

A further advantage to the invention is that, in some implementations, it can be 
configured so that, when there are multiple relevant nodes to be presented, an associated ranking 
can be used to determine the type, method or order of presentation. For example, the ranking can 
be based upon the frequency of use of particular nodes, which is tracked in these 
implementations, so that the most frequently selected or used nodes are presented first, more 
prominently, or in a particular manner. 

For example, this can be illustrated by continuing from Example 7, where the thesaurus 
entry was as follows: 

Fast food - Pizza, Burgers 
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Under the assumption that the system has been tracking the frequency of usage of the 'Tizza" 

node and the "Burgers" node and each has been accessed an identical number of times. When a 

user enters the query "Fast food", as above, the system presents the user with both the "Pizza" 

node 504 and the "Burgers" node 506, but because it tracks usage and the usage is the same, it 

presents them in the order they are Usted, i.e. "Pizza" and then "Burgers". However, at this 

point, the user's selection will cause one entry to have a greater frequency of usage relative to the 

other entry, for example a selection of "Burgers" will make it have a higher frequency of usage 

and, accordingly, a higher ranking for the next instance of use. 

Thus, the next time the system will be presenting both the "Pizza" and "Burgers" nodes 
to a user, the "Burgers" node 506 will have the higher frequency of usage and, accordingly, will 
be presented first, or more prominently, or in some other specified manner because of its 
ranking. If the frequency reverses with use so that the "Pizza" node 504 outranks "Burgers" 
node 506, then the "Pizza" node 504 will supplant the "Burgers" node 506. 

Example 9 

A further variant of Example 8 allows the node rankings to be used to prune the nodes 
themselves. In this variant, a criterion can be specified, typically zero usage over a long 
specified period of time, that is used to remove an entire node. This is advantageously made 
possible because of the system's ability to "jump" among nodes. Thus, it may occur that a node 
within the tree is never accessed, but a child node of that node is. In some variants therefore, 
when this state exists for a sufficiently long period of time, the system is constructed to delete 
that node. It should be understood that, if handled properly, this process will not even affect the 
"learning" process because, even if no user action ever directly causes the node to be presented, 
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if the learning process causes the node to be presented the node's access frequency will be non- 
zero and it will not be "pruned". 

In addition, by tracking access frequency on a node basis, a qualitative evaluation of the 
hierarchical system can be made and visuahzed. This makes it possible to review the overall 
hierarchy after some period of time and periodically optimize it based upon the result instead of 
relying purely upon the dynamic optimization that inherently and naturally flows from use of the 
teachings of the invention. 

Having now described various component aspects of different variants implementing the 
invention, by way of the above examples, it should be understood that the "jumps" can occur 
from any node to any node, i.e. vertically and/or laterally and to another node that is higher, 
lower or on the same "level" as the node from which the jump is made. All manner of vertical 
and lateral jumps from multiple nodes to multiple nodes are possible. 

In addition, it should be understood that in some applications (like document retrieval 
systems) the verbal description from the identified node may be the one issued whereas, in others 
(like an IVR system), the verbal descriptions for the children of the identified nodes may be what 
is presented. Nevertheless, in both cases, the process as described above by way of example will 
be the same or directly analogous. 

Having described the various aspects individually a more commercially suitable example, 
employing a combination of the above examples, can now be presented with reference to FIG. 6 
which illustrates a simplified example of an "interactive voice response unit" (IVR) hierarchy 
600 that might be used in the airiine industry. Of course, a real menu tree used in an IVR may 
have any number of nodes from several, up to a thousand, or more. For example, a tree with 4 
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branches from each node and which has 5 levels uniformly would have 1365 nodes. As shown 
in FIG. 6, the tree 600 is a hierarchical tree and consists of the following nodes and branches: 

Initial start (node aO) 602 

domestic flight arrival information (node al) 604 

domestic reservations (node a2) 606 

international flight arrival information (node a3) 608 

international reservations (node a4) 610 
The node 604 identified by al is a service node with pre-recorded information. 
The node 606 has two child node a 2, first/business class (node a5) and economy (node a6). 
The node 608 identified by a3 is service node with pre-recorded information. 
The node identified as a4 has three child nodes identified as first class (node a7), business class 
(node a8), and economy (node a9). 

The nodes 612, 614, 616, 618, 620 identified as a5, a6, a7, a8, a9 are all service nodes (i.e. 
terminal nodes) where a respective customer service representative will interact with the caller. 

Of course, a real system may also have a choice at the top level or at each level for a live 
operator and may even have a choice to go back to the previous menu. 

Even for such a simple example, in a traditional interactive voice response system, the 
caller would have to listen to several choices and then traverse a path down to a service node. 
Someone interested in business class reservations on a domestic flight would have to traverse the 
path (aO, a2, a5) for example. This involves listening to multiple choices at each level of the tree 
(e.g. first a prompt at aO, then four prompts offering al, a2, a3, and a4 at the next level, at which 
the caller would choose a2, and finally two prompts offering a5 and a6, at which level the caller 
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would choose a5 and then wait for the operator) and then making a choice by pressing an 
appropriate number on the telephone dial pad or altematively saying the appropriate number, hi 
certain cases, he may make a mistake: he may choose international reservations when he is 
interested in domestic reservations or something similar (simply by pressing the wrong number 
on his touch-tone telephone or saying the wrong number). If he does, then he has no choice but 
to disconnect the phone and redial the number (or if the system has a backtracking option, then 
he can backtrack, but even here he has wasted valuable time). 

In contrast, in accordance with a system implementing the invention, the caller would be 
able to say what he was looking for (e.g. "I want to make a domestic business class reservation") 
and the system would identify and respond with the appropriate node 612 (e.g. a5 in this case or 
the relevant customer service representative directly). In other words, it would enable the caller 
to skip to the correct node(s) without having to trace through the entire path. If the user makes a 
mistake, he could ask for something different wherever he finds himself in the tree, and skip 
laterally or vertically to his preferred choice. 

The system implementing the invention can further include an option that the entire 
transaction (e.g. the making of the reservation) would be carried out through natural language 
interactions with the system without the intervention of a human customer service representative. 
In other words, all the details of his domestic reservation are obtained by the system and the 
system updates a database accordingly and issues whatever commands are required (e.g. the 
mailing of a ticket) to be carried out by some human representative later. 

While it is true that some more advanced interactive voice response systems available 
today allow for natural language interactions, they are highly constrained natural language 
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interactions with relatively little or no intervention by a human operator. However, unlike with 
systems using the invention, those systems still require direct path traversal through the hierarchy 
(i.e. jumping to non-connected nodes is not contemplated or possible, let alone allowed). 
Moreovei", such systems still typically use a limited Ust of keywords, which the caller is required 
to use to correctly traverse to the next connected node. 

In contrast, variants of a system implemented in accordance with the invention can 
incorporate an automatically generated or updated thesaurus, which greatly expands the range of 
words or terms a caller can use. In these variants, the user is not restricted to parroting the highly 
constrained script as required by other interactive voice response systems, nor is the user limited 
to traversal to a connected node. In these more complex implementations of the invention, a 
system can be constructed that is able to learn new words or terms that it may not have 
understood the first time. For example, if a user asks for "coach class" and the system does not 
have the word "coach" or the phrase "coach class" in its keyword list or in its current thesaurus, 
then on this first occasion, it offers the user a traditional path down the conventional tree. But it 
tracks what the user did, what node of the tree the user went to, and on this basis, it learns a new 
response to "coach class". The next time a caller (either the same person or a different person) 
uses the words "coach class" the system does not offer the traditional path as it did the first time, 
but instead it offers a new set of nodes based on what it learned the first time. Thus, in such 
implementations, the thesaurus is a dynamically changing entity, continually updating itself by 
learning new words aiid terms and learning new "meanings" (i.e. new actions or responses) for 
existing terms. 
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Implementations according to the invention can also allow novel groupings of nodes to 
be presented to the caller based on his query. If he asks for "economy class" without specifying 
whether he wants an intemational or domestic reservation, then the system would offer him the 
nodes a6 and a9 (appropriately phrased in natural language), and allow him to further choose 
whether he wants intemational or domestic reservations, something current systems do not offer. 
In other words, the system can pick out the relevant responses from different branches of the tree 
and pool them together and offer them to the caller. 

This functioning of the system, by which it is able to skip around laterally or vertically in 
the tree, is enabled by the associating of natural language (i.e. human language) verbal 
descriptions with each node, and then using these as an initial basis for the navigation, 
augmented, in some variants, by a dynamically changing thesaurus that greatly expands its range 
and comprehension. 

Thus, based upon a conceptual understanding of the above examples, fiarther details of 
the process will now be presented. 

The flowcharts of FIGS. 7 through 14 are illustrative of a functional example of the 
general method of a more complex variant the invention as would be implemented in software 
according to the flowcharts in this case for a newspaper subscription application. It should be 
understood that particular details are provided in the description below merely for completeness 
or because they are necessary or helpful for forming an understanding of the particular 
implementation. They are not to be considered essential for implementing flie invention. 
Similarly, details unrelated to or unnecessary for understanding the invention have been omitted 
to avoid confusion. 
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An example implementation is described and contains two programs, a preparatory 
program, illustrated in FIGS. 7-10 and a transaction or query processing program, illustrated in 
FIGS. 11-14. In addition, a particular software implementation fairly corresponding to the 
flowcharts of FIGS. 7 - 14 appears in the Appendix A that follows. The program contained 
therein, is written in the "C" programming language for execution on any personal computer 
having a processor, memory , input-output, etc. capabiUties to run the particular application in its 
intended environment. 

Broadly, the first program process of FIGS. 7-10 constructs an inverted index and an 
application-specific thesaurus and the second program process of FIGS. 1 1-14 uses those 
constructs in a transaction processing system to interact with a user. 

In the preparatory program of FIGS. 7A, 7B and 8-10, the shorthand names of files that 
the program uses and the contents of the corresponding files are as follows. Notably, both the 
process parts shown in FIG. 7A and 7B as well as the process part shown in FIG. 8 are indicated 
as start points. This is because they are each independent of each other in that any of the three 
could start before any other or two or more could be run concurrently. Thus, it should not be 
presumed that tiiey are mutually exclusive or any one is per se required for the invention. 
Moreover, it should be understood that any one or more could have been undertaken at a 
different time, by a different entity, or for a different appUcation. Whether one or more of the 
portions shown in FIG. 7A, FIG. 7B or FIG. 8 are the starting points, the starting point for actual 
operational processing will be the same. 

The file named 'p' contains a list of prompts or verbal descriptions in a hierarchical 
relationship (i.e. they can be visualized or arranged in a tree-type graph). 
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The file named 'w' contains documents that are related to the prompts or verbal 
descriptions in 'p'. For example, 'w' could contain a training manual for customer service 
personnel or a website document that is likely to contain material that is related to the queries 
customers may have. This file is used to create a thesaurus. 

The file named 'f contains forms that are used to elicit relevant information firom 
customers. They have fields like 'name', for example, which would be used by the system to ask 
and record a caller's name. 

The file named 'x' contains an index associating the forms in T with terminal prompts or 
descriptions in 'p'. Once a terminal prompt is reached in the process, the corresponding form 
fi-om the file 'x' is activated, and the system proceeds to elicit information firom the user. 

The file named 's' contains a Ust of application-specific stop words, many of which are 
high-occurrence and/or generally uninformative words hke 'a', 'an', 'the' or 'fi-om' or words 
with a high-occurrence in for the particular application such that they have little meaning, for 
example, 'fly' in an airline reservation system, 'street' in a navigation system, 'file' in a 
computer search tool. These are eliminated firom 'p' and 'w' and 'f before processing, because 
they don't carry any usefiil information for the application. 

The file 'tcfg' contains the thesaurus and inverted index that will be constructed by the 
program. Of course, in alternative variants, the thesaurus could be a separate file fi-om the 
inverted index file and either or both could be made up of multiple files. 

The file 'l.cfg' is a file that is used to store newly learned words. As with the t.cfg' file, 
the 'l.cfg' file need not be a separate file, it could be part of 't.cfg', or part of a separate thesaurus 
and/or inverted index file. Similarly, the 'l.cfg' file could be made up of several files. 
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With reference to FIGS. 7A, 7B and 8 through 10, the processes as carried out by the first 
program are as follows. It bears noting that, although the process and its components are 
presented by way of example in a particular order, unless a specific process component is 
expressly stated to necessarily have to occur at a particular time or after some other particular 
process component, or two process components must necessarily occur in sequence because one 
relies upon completion of the other before it can start, no order should be implied or considered 
required since the order in different implementations may be different and may vary based upon 
the particular programmer, programming language and/or computer involved. 

The files p, w, f, x, and s are each read and processed as follows. It should be understood 
that the order of processing of file 'p' relative to file 'f or their respective sub-processing 
components, although shown sequentially, could be done in a myriad of ways including doing 
each of the reading extracting and storing concurrently or as a common operation (i.e. reading 
for both is done before extracting for both, etc.). 

Specifically, keywords are extracted fi-om p and bom f . These are initially just 

all the words or terms contained in the prompts in p. The keywords are stored, for example, in a 
temporary file. 

Similarly, thesaurus words are extracted from w. These are initially just all the words or 
temis in w. They are also stored, for example, in a temporary file. 

Stop words are loaded from s (902) and stop words and duplicate words are eliminated 
bom keywords and thesaurus words stored in the temporary files. 

The thesaurus is constructed in accordance with FIGS. 9 and 10 described in overview as 
follows: 
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a. Increment the file of thesaurus words with keywords from p and f remaining after 
eUmination of stop words. 

b. Create a matrix of thesaurus words as row words (or words listed along the rows 
of the matrix) against keywords as column words (or words listed along the 
columns of the matrix). 

c. Count the number of co-occurrences of each row word with each column word of 
the matrix in the documents contained in w and fill in that number in the 
corresponding matrix cell. (For example, a co-occurrence of a pair of words may 
be defined as that pair occurring in the same paragraph. If w is made up of a 
hundred paragraphs, then take each pair of row word and column word and count 
the number of times this pair occurs within the space of each of the hundred 
paragraphs in w. For each pair, the pair may co-occur zero or more times in a 
paragraph and add up the number of co-occurrences in all the paragraphs in w.) 

This process yields a matrix filled with nonnegative integers in each cell. It is then 
possible to consider each row of numbers as a vector associated with the corresponding row 
word. When viewed geometrically, these vectors, one for each row word, form angles with each 
other in a multi-dimensional space. As a result, we can calculate the cosine of each such angle 
by computing scalar products for the angles. Thus, we compute the cosines of the angles formed 
by the vectors associated with each pair of row words. 

The cosine values for all pairs of row words and column words are calculated and stored, 
for example, in a new matrix. 
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For each row word, the top 'n' cosine values are identified as are the corresponding 
keywords. For example, in an airline system context, if there are two row words 'coach' and 
•economy', where 'economy' is also a keyword (originally from p and/or f), and if the cosine 
value of this pair or words is among the top 'n' cosines for the word 'coach', then 'economy' is 
identified as a synonymous keyword for coach. 

A new file can then be created, formatted for example, by listing thesaurus words on the 
left (e.g. coach), and against each thesaurus word, its associated keywords (e.g. economy). This 
is referred to as an inverted index (i.e. the thesaurus) of row words and their keyword synonyms. 
Essentially, this file will now contain words like 'coach' coupled with its particular alternative 
meanings, one of which may be 'economy'. The user interactive transaction processing 
program, the second program, will later use this thesaurus file when a caller uses a word like 
'coach' in his query to determine the relevant keywords (like 'economy'). This will enable the 
program to find the relevant prompt with which to respond to the user. 

Optionally, to provide the system with a set of prompts or verbal descriptions with which 
to respond to a user, another inverted index is created using the files p, f, and x. This index will 
contain a list of keywords from p and/or f associated with the prompts in which they occur. 
Thus, when a user uses a synonym like 'coach' in a query, the second program will look up the 
tliesaunis, find the keywords corresponding to it (e.g. 'economy'), and then look up the inverted 
index to find the prompts corresponding to 'economy' and other corresponding keywords. 

Once both the invated index and thesaurus files have been created, the file t.cfg can be 
created from them for use by the second program. 
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One example of the program flow for a fairly generic transaction processing program 
implementing one variant of the invention is illustrated in the flowcharts of FIGS. 1 1 through 14. 
This example is configured to incorporate a collection of several of previously described simple 
aspects. To demonstrate the functions of this program and how this program operates, for 
context we use an example interaction that a calling customer might have with this example 
system. 

Following the example is the Appendix contains that program code essentially 
implementing a variant of the invention largely corresponding to that of FIGS. 7 through 14. 

The particular example we use for purposes of illustration is for an automated telephone 
system for a newspaper, like the New York Times. For simplicity, every item in the flowchart is 
not traced through since, an understanding of the process with respect to one path will be 
sufficient to allow an understanding of the other paths. 

The example begins with "I want to subscribe" uttered by the caller to the system. We 
will assume that the first three words of the query (i.e. 'T', 'Vant", and "to") are stop words and 
the last word (i.e. "subscribe") is neither a keyword nor a thesaurus word. 

The process as carried out by the second program are as follows: 

The files t.cfg, l.cfg, f, x, and s are read (1 102). 

The keywords, thesaurus words, prompts bom t.cfg. are loaded (1 104), as are the learned 
words from l.cfg. Initially, l.cfg will be empty as the program has not yet learned any new 
words. The forms and index of forms against prompts bom f and x respectively are loaded, as 
are stop words from s. 
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The program opens the interaction with a greeting (1 106) and an eUcitation of the first 

query from the caller (1 108). This might be: "Thank you for calling the New Herald. How may 

we help you?" 

The caller then utters his or her statement: "I want to subscribe". 
The stop words in the statement are first eUminated, leaving behind just the word 
"subscribe". 

The statement is then processed in the following way: 

The keywords and the thesaurus words remaining in the query are identified (1202, 1204) 
by comparing with the list in t.cfg and l.cfg. As we have assumed that "subscribe" is neither, we 
have none. 

The prompts that best match the identified keywords and thesaurus words are selected 
(1206). As there are no such words identified, there are no prompts selected. 

The program arrives at a decision in the flowchart: are any nodes selected? (1208). Since 
the answer is in the negative, the program will follow the branch and select the top level node 
(1218). (Note: These top level prompts are the ones at the top level of the menu tree.) This 
completes the prompt selection process. The process then proceeds to the second part of the 
query process. 

The process proceeds with another decision: has a single leaf prompt been selected? 
(1210). Since the top level prompts are selected (of which there are more than one and also none 
is a leaf prompt), a negative answer is the result. 
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These prompts or verbal descriptions are issued to the user (caller) and elicit another 
response. Assume that the offered verbal descriptions are as follows: 
System: Are you calling about subscriptions? 
System: Is there a problem with your paper or delivery? 
System: Would you like information about the New York Times website? 
System: Are you calling about advertisements? 
System: Are you calling about something else? 

Assume further that the caller responds as follows: 
User: I am caUing about subscriptions. 

As a result, the program returns to selecting verbal descriptions by identifying the 
keywords and the thesaurus words remaining in the query by comparing with the list in t.cfg and 
l.cfg (1202, 1204). "Subscriptions" is now synonymous with a keyword and it is identified. 

The program will again select verbal description(s) that best match the identified 
keywords and thesaurus words (1206). 

For example, assume these are: 
System: Would you like to order a subscription? 
System: Would you like to give a gift subscription? 

System: Would you like to change your address or change any other information? 

The program then arrives at a decision branch (1208) in the flowchart: are any nodes 
selected? Since the answer is affirmative, it follows that branch and exits the prompt selection 
process and returns to the query process. 
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This begins with another decision box: is a single leaf node selected? (1210). The answer 
is no, since three prompts have been selected. 

Next, these verbal descriptions are issued to the caller and the system will await his 
response (1220). We assume the caller responds as follows: 
User: I want to order a subscription 

The program will again retum through a loop to the prompt selection process (1202, 
1204, 1206) where the program will identify the keywords and the thesaurus words remaining in 
the query by comparing with the list in t.cfg and Lcfg. "Order" and "subscription" are now 
identified. 

Verbal descriptions are selected that best match the identified keywords and thesaurus 
words. Now assume this is just the prompt "Would you like to order a subscription?" from the 
three descriptions above. 

The program will then arrive at a decision branch (1208) in the flowchart: are any nodes 
selected? Since the answer is affirmative, it follows that branch and exits the prompt selection 
process and returns to the query process to again arrive at a decision: has a single leaf node been 
selected? (1210). This time the answer is yes, a single prompt has been reached, which is also a 
leaf prompt, since it is at the bottom of the menu tree. 

This is followed by another decision: any verbal description corresponding to the node? 
(1212). The program checks t.cfg and finds the answer is no. 

The branch then leads to yet another decision (1214): is a form for verbal description 
available? The answer by checking the index x is the yes branch. This leads to the portion of the 
flowchart of FIG. 13. 
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The form is processed in the following way: 

The first part is a decision: is it a response form? (1302). The answer is no. 

The system then issues questions to the caller based on the form and accepts information 
back (1304). The questions are of the form "Please tell us your name", "Where do you live?", 
"Do you want an annual or half-yearly subscription?" etc. The caller provides the information to 
the system. 

It repeats the information the caller has given the system and asks if the information is 
correct. Let us assume the user confirms that the information is correct. 

The system then calls an external routine to store the information in a database. The 
routine retums another form to the system (1306) and returns in a loop to the question: is it a 
response form? (1302). Since the form contains questions about the payment, based on the type 
and period of subscription selected by the caller, the answer will be negative. 

The system then issues these questions to the caller and the caller provides the required 
information (1304). 

The system then repeats the information and gets a confumation firom the caller. 

The information is passed to another routine (mentioned in the form) to update the 
database. This routine (1306) then retums a response form and again retums in the loop to the 
question: is it a response form? (1302). This time the answer is yes. The system then issues a 
response (1308) thanking the caller for the subscription, and exits this process returning to FIG. 
11. 
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The system now exits the query process as well since the caller's query has been 
completely processed and the corresponding actions taken by the system. It now returns to the 
main part of the program. 

The next process in the main part of the program is a question: is there an unknown word 
in the caller's query? (1 1 12). The answer is yes, since the word "subscribe" in the initial query 
was not known to the system. This invokes the portion of the flowchart of FIG. 14. 

The system therefore has to learn this previously unknown word: 

The learning process begins with a decision: is the word already in l.cfg? (1402). The 
answer is no, since l.cfg is initially empty and the word has not been encountered before. 

The corresponding "NO" branch is followed and the word is added to the list of learned 
words (initially empty) with keywords from the final single leaf prompt that was selected (1404). 

The system then records these changes in l.cfg (1408) and returns to the main part of the 
program in FIG. 1 1. It has now learned the meaning of the initially unknown word "subscribe". 

Next, the program asks the caller if he wishes to continue (1 1 14) (i.e. are there any 
fiirther queries). We assume the answer is no and the system thanks the user and exits. 

Now, having described the example traversal of one path through the second program 
with reference to the flowchart, an example dialogue for the path traversal that has taken place is 
presented so the complete transaction can now be understood. 
Dialogue : 

Caller: I want to subscribe 

System: Are you calling about subscriptions? 

System: Is there a problem with your paper or delivery? 
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System: 


Would you like information about the New York Times website? 


System: 


Are you calling about advertisements? 


System: 


Are you calling about something else? 


Caller: 


I am calling about subscriptions 


System: 


Would you like to order a subscription? 


System: 


Would you like to give a gift subscription? 


System: 


Would you like to change your address or change any other information? 


Caller: 


I want to order a subscription 


System: 


Please tell us your name 


Caller: 


Bertrand Russell 


System: 


Where do you live? 



The dialogue continues in this way with the system eUciting the required information 
from the caller. 

Having demonstrated traversal in a system where the system was constructed to learn 
when an unknown word is used, what happens the second time a caller uses the same word 
"subscribe" in a query after it has been learned by the system can now be demonstrated. This 
demonstrates the power of including the optional feature of learning in the program. 

In this case, the dialogue that occurs when a new caller uses the word "subscribe" 
following the above is now presented. 
Dialogue : 

Caller: I want to subscribe 

System: Please tell us your name 
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Caller: J. L. Austin 

System: Where do you live? 

Thereafter, the process continues. Notably, the system has now leamed the correct 
response to the query "I want to subscribe". 

Other Variants 

Having described several simple and more complex examples that make it possible to use 
the invention, other variants can now be presented. Examples of such optional functions that can 
be incorporated into other variants, individually or collectively, include: 

a) creating the thesaurus by providing access to a collection of multiple documents 
and determining synonymy based on sufficient similarity of meaning with the keywords as 
measured by the frequency of co-occurrence of the keywords in the collection of documents; 

b) identifying words in the user's response by recording the response for future 
learning; 

c) parsing out of a response all non-stop word unknown terms or keywords; 

d) identifying synonyms for all non-stop terms in the user's response; 

e) cycling between user and system responses until the user reaches a vertex (i.e. 
verbal description) that enables him to carry out his goal and updating the thesaurus when the 
goal vertex is reached by associating the recorded previously unknown words in the user's 
response with the keywords that are associated with the verbal description reached by the user; 

f) recording, when the goal vertex is reached, the pairs of synonyms in the user's 
responses and the keywords that are associated with the verbal description reached by the user; 
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g) removing associations between keywords and their synonyms from the thesaurus 
that have not been accessed more than a specified amount of times within a specified period (this 
can be based upon a parameter set in the system by the system's administrator or can occur as 
part of program maintenance or updates); 

h) selecting the verbal descriptions that best meet the user's goal as indicated by the 
keywords and synonyms in the user's response by identifying the keywords in the user's 
response and/or the keywords corresponding to synonyms in the user's response and computing 
a degree of match between each verbal description and the identified keywords, in accordance 
with conventional linguistic processing techniques; 

i) computing the degree of match between verbal descriptions and identified 
keywords by utihzing the pairs of synonyms in user's response and the keywords associated with 
the verbal descriptions reached by users as previously recorded; 

j) responding to the user on the basis of verbal descriptions selected by presenting 
the user with verbal descriptions that best match the user's previous response; 

k) for "best match" variants, in the event that even the best matches have a low 
degree of match, the best "n" verbal descriptions are presented to the user ("n" being a number 
representing a predetermined system parameter); 

1) for "best match" variants, in the event that the best matches have a low degree of 
match, the user is automatically connected to a human operator, when or if a human operator is 
available; 
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m) for "best match" variants in the event that the best matches have a low degree of 
match, the best "n" verbal descriptions are presented to the user, along with an option of being 
connected to a human operator when or if a human operator is available; 

n) presenting the user with those verbal descriptions that best match the user's 
previous response in order to elicit any information from the user that may be required to 

accomplish the user's goal; 

o) recording information elicited from a user in a database for future use; 

p) selecting multiple verticies in the graph structure that are not connected to a 
previously selected vertex, based upon parameters associated with nodes correlated to keywords 
and synonyms in a user's response; 

q) selecting a vertex in the graph structure in the same row as the previously selected 
vertex based upon the keywords and synonyms in the user's response; and/or 

r) updating the thesaurus by adding words from a user's response that are not in the 
thesaurus. 

Finally, it is to be understood that various variants of the invention including 
representative embodiments have been presented to assist in understanding the invention. It 
should be understood that they are not to be considered limitations on the invention as defined by 
the claims, or limitations on equivalents to the claims. For instance, some of these variants are 
mutually contradictory, in that they cannot be simultaneously present in a single embodiment. 
Similarly, some advantages are applicable to one aspect of the invention, and inappUcable to 
others. Thus, no particular features or advantages should be considered dispositive in 
determining equivalence. 
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It should therefore be understood that the. above description is only representative of 
illustrative embodiments. For the convenience of the reader, the above description has focused 
on a representative sample of all possible embodiments, a sample that teaches the principles of 
the invention. The description has not attempted to exhaustively enumerate all possible 
combinations or variations, for example, those arising out of the use of particular hardware or 
software, or the vast number of different types of applications in which the invention can be 
used. That alternate embodiments may not have been presented for a specific portion of the 
invention, or that further undescribed alternate embodiments may be available for a portion of 
the invention, is not to be considered a disclaimer of those alternate embodiments. One of 
ordinary skill will appreciate that many of those undescribed embodiments incorporate the 
minimum essential aspects of the invention and others incorporate one or more equivalent 
aspects. 

APPENDIX A 
FILE IDENTIFICATION 

Main Source Files 

main.c, process.c, arraylib.c, stemlib.c, dialog.c, mteractive.c, formhb.c 

Header Files 

globalvar.h, process.h, arraylib.h, forms.h 

Make Files 

Makefile 
Parameter Files 

t.ini, d;ini 
Data Files 

p, w, s, f, X, a 
Configuration Files 

t.cfg, l.cfg 
Shell Script Files 

acctjnfo, add_acct, chg_acct, get_pymt, updt_pymt, susp_deh, updt_acct, preter 
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MAIN SOURCE CODE (in C) 

main.c: Main Program to process p and w to create the thesaurus 

y*************************************************** 

SOURCE CODE DOCUMENTATION 

#include <stdio.h> 
#include <string.h> 
#include "process.h" 
#include "arraylib.h" 
#include "forms.h" 

int numColumn = 0, numRow = 0 , numlndex = 0, numMenu; 
int top Values = 5 ; 

char **rowTemis, **columnTenns, **prompts, ** stop Words; 
double **matrix, **cosine; 

float phoneThreshold = 0.02, webThreshold = 0.0006; 
int **indexList, **menuList, **thesaurus, **promptKeys; 
int numStopWord = 0; 
int numForms, numPF; 
struct form **fonnlist; 

char ***Fprompts, *wdoc, *pdoc, *sdoc, *fdoc, *xdoc, *cfg; 

main(int argc, char *argv[]) { 

intij; 

PRINT THESAURUS PROGRAM INFO 

/* if(argc!=5) { 
printf("Usage Instructions: t p w f x\n"); 

printf("Parses w for matrix row terms and p for matrix colimm terms.Nn"); 
printf("*** Exiting, goodbye.Nn"); 
exit(l); 
} */ 

if (argc != 2) { 

printf("Usage Instructions: t <ini-file>\n"); 
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printf("*** Exiting, goodbye.\n"); 
exit(l); 

} 

y*** *********************************************** *************** 
OPEN INPUT FILES 

4: ********** ************************************** 

readini(argv[l]); 
loadStopWords(sdoc); 
numPF = loadFormsList(xdoc); 
numForms = loadFonns(fdoc); 

^***************************************************************** 

PREPARATION FOR PHONEDOC PARSING 

*****************************************************************/ 
printf("\nReading files ....\n"); 

numColumn ^ processFile(pdoc, &columnTerms, phoneThreshold); 
// printf("The document contains %d relevant terms.\n\n", numColumn); 

// This routine will add the keywords fi*om the Forms into ColumnTerms. 
numColumn = addFormKeys(&colunmTerms, numColumn); 

// printf('The document contains %d relevant terms.\n\n", numColumn); 

y***************************************************************** 

PREPARATION FOR WEBDOC PARSING 
*****************************************************************/ 

numRow = processFile(wdoc, &rowTerms, webThreshold); 

y***************************************************************** 

MERGE COLUMNTERMS & FINALTERMS INTO ROWTERMS 
*****************************************************************/ 

numRow = merge Array(&rowTerms, columnTerms, numRow, numColumn); 
sortArray(rowTerms, numRow); 
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// printfC'The document contains %d relevant tenns.\n\n", numRow); 
MATRIX CONSTRUCTIONS 

printf("loading prompts ...\n", numlndex); 

numlndex = loadPrompts(pdoc); 

printf("processing words ...\n", numlndex); 

createMatrix(wdoc); 

numRow = eraseZeroesQ; 

calcCosineQ; 

filllndexQ; 

// This function will add leaf prompts to the index keywords from Forms. 

// appendlndex(argv[3]); 

createThesaurusQ; 

// printf("created thesaurus .\n\n", numlndex); 

printf("saving data ...\n"); 

saveData(cfg); 

printf("done.\n"); 

} 



readini(char * filenm) 

{ 

FILE * fp ; 

char buf[80], key[80], value[80], comment[80]; 
int cnt; 

if ((fy=fopen(filenni,"r"))==hnjLL) 
{ 

perTor(filenm); 
exit(l); 

} 

while (fgets(buf,79,fp)!=NULL) 
{ 

sscanf(buf,"%s %s %s",key,value, comment); 
if (!strcmp(key, "pdoc")) 

pdoc=strdup(value); 
if (!strcmp(key, "wdoc")) 

wdoc=strdup(value) ; 
if (!strcmp(key, "sdoc")) 

sdoc=strdup(value); 
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if(!strcmp(key, "fdoc")) 

fdoc=strdup(value); 
if (!strcmp(key, "xdoc")) 

xdoc=strdup(value); 
if(!strcmp(key, "cfg")) 

cfg=strdup(value) ; 
if(!strcmp(key, "pt")) 

sscanf(buf;'%s %f %s",key,&phoneThreshold,value); 

//phoneThreshold=(float)atof(value); 
if (!strcmp(key, "wt")) 

sscanf(buf,"%s %f %s",key,&webThreshold,value); 
if (!strcmp(key, "tv")) 

topValues=atoi(value); 

} 

} 



process.c: This program contains various functions called from Main 

#include <stdio.h> 

#include <string,h> 

#include <math.h> 

#include "globalvar.h" 

#include "arraylib.h" 

#include "forms.h" 

#defme min(x, y) (x < y) ? x : y 

int *rowcount, ''^colcount; 

int processFile(char *filename, char ***cArray, float threshold) { 
FILE * fp; 

char tmpWord[50], paraFlag; 

int i, num Words = 0, wordLen = 0, totWords == 0; 

float *freq Array; 

fp = fileOpen(filename,"r"); 
*cArray = NULL; 
freqArray = NULL; 

while((wordLen = fetchWord(fp, tmpWord)) != 0) { 

totWords++; 

if (! inArray(stop Words, tmpWord, numStopWord)) { // ignore stopwords 
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stemWord(tmpWord); 

if (i = inArray(*cArray, tmpWord, num Words)) { 
freqArray[i - 1]++; 
} 

else { 

addWord(cArray, tmpWord, -H-num Words); 

freqArray = (float *) realloc(freqArray, numWords * sizeof(float)); 

freqArray[num Words - 1] = 1; 

} 

} 

// printfC'Totwords = %d, numWords = %d\n",totWords, numWords); 
for ( i = 0; i < numWords; i++) 
{ 

if ((float)(freqArray[i] / totWords) >= threshold) 
(*cArray)[i]=NULL; 

} 

numWords = removeNulls((*cArray), numWords); 
sortArray((*cArray), numWords); 

return numWords; 
} 

Prompts Processing 

****************************************************** 

int loadPrompts(char *filename) 

{ 

charbuffer[256]; 
inti = OJ,len, nc; 
int level[10], tabs, m = 0; 
FILE * fp; 

for(i = 0;i<10; i++) 
level[i] = 0; 

fp = fileOpen(filename,"r"); 
prompts = NULL; 
menuList = NULL; 

j = i = 0; 

while (fgets(buffer, 256, fp) != NULL) 
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{ 

tabs = allTrim(buffer); 
if ((len = strlen(bufrer)) = 0) 
continue; 

if ((j = inArray(prompts, buffer, i)) = 0) 
j = U 

else 

j--; 

level[tabs+ l]=j + 1; 

menuList = (int **)realloc(menuList, ++m * sizeof(int *)); 
menuList[m - 1] = (int *)malloc(3 * sizeof(int)); 
menuList[m - 1][0] = level[tabs]; 
menuList[m - 1][1] = level[tabs + 1]; 
nienuList[m - 1][2] = 0; 

ifa=i) 

addWord(&prompts, buffer, ++i); 

} 

numMenu = m; 
for (j = 0; j < numMenu; j++) 

{ 

for(m = 0; m< numMenu; m+-*-) 

if (menuList[j][l] =menuList[m][0]) 
break; 

if (m != numMenu) /* Leaf Node */ 
continue; 

nc = 0; 

for (m = 0; m < numMenu; m++) 

if (menuList[m][0] = menuListIj][0]) 
nc-H-; 

if (nc != 1) 
{ 

menuList[j][2] = 99; 
continue; 

} 

len = strlen(prompts[menuList[j][l] - 1]); 
if (prompts[menuList[j][l] - l][len - 1] = r) 
menuListU][2] = 99; 

else 

{ 

for (m = 0; m < numMenu; m++) 

if (menuList[m][l] = menuList[j][0]) 

menuList[m][2] = menuList[j][l]; 
menuList[j][2] = 100; 
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} 

return i; 
} 



void filllndexO 

{ 

int i,j,k; 

indexList = (int **)malloc(numColumn * sizeof(int *)); 
for (i = 0; i < numColumn; i-f-+) { 

indexList[i] = (int *)malloc(numIndex * sizeof(int)); 

for (j 0; j < numlndex; j-H-) 
indexList[i]|j] = 0; 

} 

for (i = 0; i < numlndex; i++) 

updateThesaurus(prompts[i], i + 1); 
updateFrmFormsO; 

} 

updateThesaurus( char *str, int pmpt) 

{ 

char tmpstr[256]; 
char *sarray[50]; 
int ij,k, wrds; 
int iflag = 0, dflag = 0; 

strcpy(tmpstr, str); 
wrds = readValues(tmpstr, sarray); 
stemArray(sarray, wrds); 
for (i = 0; i < wrds; i-H-) 
{ 

for (j = 0; j < numColumn; j++) 
{ 

if (!strcmp(columnTermsIj], sarray[i])) 
{ 

iflag = 1; 
dflag = 0; 

for (k - 0; indexList[j][k] && k < numlndex; k++) 
if (indexList[j][k] = pmpt) 
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dnag=l; 
if (k < numlndex && dflag = 0) 
indexList[i][k] = pmpt; 

break; 
} 

} 

} 

if(iflag = 0) 
{ 

printf("** warning the following prompt does not contain index word\n"); 

printf("\t%s\n", str); 

} 



Create Matrix here 

**************************************************** 

void createMatrix(char * filename) { 
int ij, nwp = 0, k = 0; 
int minv; 
FILE * fp; 

/* allocate memory for matrix */ 

matrix = (double **)malloc(numRow * sizeof(doubie *)); 
for (i = 0; i < numRow; -Hhi) { 

matrix[i] (double *)malloc(numColumn * sizeof(double)); 

for (j = 0; j < numColumn; 
matrix[i][j] = 0; 

} 

/* allocate memory for rowcount and column count */ 
rowcount = (int *)malloc(numRow * sizeof(int)); 
colcount = (int *)malloc(numColumn * sizeof(int)); 

/* Go to start of document */ 

fp = fileOpen(filename,"r"); 

while (!feof(fp)) 
{ 

/* initialize rowcount array */ 
for (j = 0; j < numRow; j-H-) 
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rowcount[j] = 0; 
/* initialize columncount array */ 
for (j = 0; j < numColumn; j-H-) 

colcount[j] = 0; 

nwp = readPara(fp); 

if(feof(fp)) 

break; 
if (nwp = 0) 

continue; 

/* add co-occurance of rowword & colword to the matrix */ 
for (j = 0; j < numRow; j-H-) 

for (k = 0; k < numColumn; kH-+) { 

minv = min(rowcount[j], colcount[k]); 

matrix[j][k] += minv; 

} 

} 

} 



int readPara(FILE *fp ) 
{ 

int i, j, k, wcount = 0, m = 0; 
int nextpara, currpara, wordLen; 
char tmpword[50]; 

currpara = ftell(^); 
wcount = wordsInPara(fp); 
if (feof(fp)) { 

if (wcoxmt = 0) 
return 0; 

} 

nextpara = ftell(fp); 

fseek(^, currpara, 0); 

for (i = 0; i < wcount; -H-i) { 

wordLen = fetchWord(fp, tmpword); 

if (inArray(stopWords,tmpword,numStopWord)) 
continue; 

stem Word(tmp word) ; 

/* count the occurance of each word from the row in para */ 
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for (j = 0; j < numRow; j+-h) 

if (!strcmp(rowTemis[j], tmpword)) { 
rowcount[j]-H-; 
break; 

} 

/* count the occurance of each word from the column in para */ 
for (j = 0;i< numColumn; j-w-) 

if (!strcmp(columnTerms[j], tmpword)) { 

colcount[j]-i-+; 

break; 

} 

} 

fseek(fp, nextpara, 0); 
return wcount; 

} 

int wordsInPara (FILE *fp) 
{ 

int c, count = 0; 

int state; 

const int out = 0, in = 1 ; 
state = out; 

while ((c = getc(fp)) != EOF) { 
if (!isalpha(c)) { 

if(c = V ||c = EOF) 

break; 
state = out; 

} 

else 

if (state = out) { 
state = in; 
count-H-; 

} 

} 

return count; 

} 

/*******************************************#*****^ 

Calculate Cosine Function 

***************************************************** 
void calcCosineQ 
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{ 

intij,k, sum; 

/* memory allocation for the cosine matrix */ 

cosine = (double **)malloc(numRow * sizeof(double *)); 
for (i = 0; i < nuroRow; ++i) { 

cosine[i] = (double *)malloc(((numRow) * sizeof(double))); 

for (j = 0; j < numRow; j++) 
cosine[i]|j] 0; 

} 

/♦Normalization*/ 

for (i = 0; i < numRow; -H-i) 

{ 

sum = 0; 

for (k = 0; k < numColumn; ++k) 

sum += matrix[i][k] * matrix[i][k]; 
if(sum!=0) 

{ 

for (j = 0; j < numColumn; ++j) 

matrix[i][j] = matrix[i][j] / sqrt(sum); 

} 

} 

/*Cosines*/ 

for (i = 0; i < numRow; -H-i) 
{ 

for (k = i -M ; k < numRow; -i-^k) 
{ 

cosine[i][k] = 0; 

for (j = 0; j < numColumn; ++)) 

cosine[i][k] += matrix[i][j] * matrix[k][j]; 

} 

} 

} 

/********************************************** 

eraseZeroes : removes the row with all zero column in the matrix 
****************************************************** 

int eraseZeroesO { 
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intj,k; 
int cond; 

/* Free and nullify the rowTerms and matrix row for all zeroes */ 
for (j = 0; j < numRow; ++j) { 
cond= 1; 

for (k = 0; k < numColumn; -H-k) { 
if(matrix[j][k] !=0) { 
cond = 0; 
break; 

} 

} 

if(cond=l) { 

rowTermsU] = NULL; 
matrix[j]=NULL; 

} 



/* Push NULL rows at the end of arrays */ 
for (j = 0; j < numRow; j-H-) 

{ 

if (rowTermslj] == NULL) 
{ 

for (k = j + 1 ; k < numRow; k++) 
if(rowTerms[k] !=NULL) 
break; 
if (k < numRow) 
{ 

rowTermsU] = rowTerms[k]; 
matrix|j] = matrix[k]; 
rowTerms[k] = NULL; 
matrix[k]=NULL; 

} 

} 

} 

/* count new numRow */ 

for (j = 0; (rowTermsU] != NULL) && j < numRow; j++); 
return j; 

} 
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^**************************************** ************** 

createThesaurus: Function to Create Thesaurus of rowTerms by taking the 
index words matching the top 5 cosine values. 

************************************************************************/ 

void createThesaurusO 

{ 

inti,j,k, 1; 

int m, numword; 

double *tmpcos, prevcosine = 0; 

int *colnum; 

tmpcos = (double *)malloc(numRow * sizeof(double)); 
colnum = (int *)malloc(numRow * sizeof(int)); 

thesaurus = (int **)malloc(nuniRow * sizeof(int *)); 
for (i = 0; i < numRow; i-H-) { 

thesaurus[i] = (int *)malloc(numColumn * sizeof(int)); 

for (j=0;} < numColumn; j-H-) 
thesaurus[i][j] = 0; 

} 

/* initialization of thesaurus */ 

for (i = 0; i < numRow; i-M-) { 

for ( j = 0; j < numRow; j^) { 

if(i>j) 

tmpcos[j] = cosine|j][i]; 

else 

if(i<j) 

tmpcos[j] = cosine[i][j]; 

else 

tmpcos[j] = 0; 

colnum[j] = j; 
} 

floatSort(colnum, tmpcos, numRow); 

numword = prevcosine = 0; 

/* count top *top Values' of cosine */ 
for (m = 0; m < numColumn; m-H-) { 
if (prevcosine != tmpcos[m]) 
numword+H-; 
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prevcosine = tmpcos[m]; 
if (numword == top Values + 1) 
break; 

} 

/* m = total num of syn */ 

for 0 = k = 0; k <= m; k++) { 

if ((1 = inArray(columnTenns,rowTerms[colnum[k]], numColumn)) != 0) 
if(tmpcos[k] !=0) { 

thesaurus[i][j] = 1; 

j++; 

} 

} 

} 

} 

/******************************************************************* 
floatSort : Sorts the array of cosine values and corresponding index of 
index words in reverse ordCT. 

***********************************************************************^ 

floatSort(int *colnum, double *tmpcos, int numRow) 

{ 

inti,j,k; 
double f; 

for (i = numRow - 1 ; i > 0; i~) 
for(j=0;j<i;j++){ 

if (tmpcosO] < tmpcosO + 1]) { 

f = tmpcoslj], k = colnum[j]; 

tmpcosU] = tmpcos[j + 1], colnumO] = colnum[j + 1]; 

tmpcos[j + 1] = f, colnumU + 1] = k; 

} 

} 

} 

void saveData(char *filenm) 
{ 

inti,j,k, 1; 
FILE *fp; 

fp = fileOpen(filenm, "w"); 
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printArray(fp, "PROMPTS", prompts, NULL, numlndex, 0); // Write Prompts to the file 

/********** Write Menu-Tree to the file **********/ 

// printArray(fp, "MENUTREE", NULL, menuList, numMenu, 2); 

fprintf(fp, "[%s]\n", "MENUTREE"); 

for (i = 0; i < numMenu; i++) 

fprintf(^, "%d,%d,%d\n", menuList[i][0], menuList[i][l],menuList[i][2]); 

fyrintf(fp, "\n"); 

printArray(fp, "INDEX", columnTerms, indexList, numColumn, numlndex); // Write Index to 
the file 

printArray(fy, "THESAURUS", rowTerms, thesaurus, numRow, numColumn); // Write 
Thesaurus to the file 

fclose(fp); 

printf("Data saved in %s\n",filenm); 
} 

printArray(FILE char *head, char **cAiray, int **iArray, int cNum, int iNum) 
{ 

inti,j; 

^rintf(fp, "[%s]\n", head); 
for (i = 0; i < cNum; 
{ 

fprintf(fp, "%s cArray[i]); 

for (j = 0; j < iNum && iAn-ay[i]U] != 0; ]++) 

fprintf(fp, "%d,", iArray[i]|j]); 
fprintf(fp, "\n"); 

} 

Q)rintf(fp, "\n"); 
} 



int addFormKeys(char ***cArray, int count) 
{ 

char **wordList, *tmparray[20]; 

inti,j,k, words; 
int 1, tmpcount; 

wordList=NULL; 
words = 0; 

for(i = 0; i < numPorms; 
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for (j = 0; j < formlist[i]->numFields; j-H-) 
{ 

if(!strcmp("MChoice",fonhlist[i]->fields[j]->Type)) 

for(k = 0; k < formlist[i]->fields[j]->numChoice; k++) 

{ 

tmpcount = createATray(formlist[i]->fields[j]->Choice[k], 

tmparray); 

for(l = 0; 1< tmpcount; 

addWord(&wordList, tmparray[l], -H-words); 

} 

} 

i = mergeArray(cArray, wordList, count, words); 
sortArray((*cAiTay), i); 
return i; 

} 



updateFrmFormsQ 
{ 

inti,j, k, 1; 

int m, n, x, tmpcount; 

int pmpt; 

char *tmpstr, *tmparray[20]; 

for (i = 0; i < numPF; 
{ 

pmpt = inArray(prompts, Fprompts[i][l], numlndex); 
if(pmpt = 0) 
{ 

printf("Unknown prompt encountered for form %s\n",Fprompts[i][0]); 

exit(l); 

} 

for(j = 0; j < numForms; j++) 

if (!strcmp(Fprompts[i][0], formlist|j]->name)) 
break; 
if (j = numForms) 

continue; 

for(k = 0; k < formlist[j]->numFields; k++) 

{ 

if(strcmp(formlist[j]->fields[k]->Type;'MChoice")) 
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continue; 

for(l = 0; 1< formlist[j]->fields[k]->numChoice; 1++) 

{ 

tmpcount = createArray(formlist[j]->fiel(is[k]->Choice[l], tmparray); 
for(m = 0; m < tmpcount; m++) 

{ 

n = inArray(coluinnTerms, tmparray[m], numColumn); 

n-s 

for (x = 0; indexList[n][x] && x < numlndex; x++) 
if (indexList[n][x] = pmpt) 
break; 

if (x < numlndex && indexList[n][x] == 0) 
indexList[n][x] = pmpt; 

} 

} 

} 

} 

} 



arraylib.c: This program contains general purpose functions 
#include <stdio.h> 
#include <string.h> 
#include "globalvar.h" 
#include "forms.h" 

FILE * fileOpen(char *, char *); 

int fetchWord(FILE *f, char * wrd) { 
int i = 0, c; 
wrd[0] = 0; 
if(feof(f)) 

return 0; 
while(!isalpha(c = fgetc(f))) 

if(c = EOF) 
return 0; 

do { 

wrd[i-H-] = tolower(c); 

} while(isalpha(c = fgetc(f))); 
wrd[i] = 0; 
return i; 

} 
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int iiiArray(char **array, char *word, int length) 
{ 

int i; 

for (i = 0; i < length; 

if (array[i] != NULL && !strcmp(array[i], word)) 
return i + 1 ; 

return 0; 
} 

int removeNulls(char **strarray, int num Words) 
{ 

intij; 

for (i = 0; i < num Words; 

{ 

if(straTTay[i]=NULL) 
{ 

for (j = i + 1 ; j < num Words; j++) 
if(strarray[j] !=NULL) 
{ 

strarray[i] = strarrayU]; 
strarrayU] = NULL; 
break; 
} 

} 

} 

/* get count of filtered words */ 

for 0 = 0; (strarraylj] != NULL) && 0 < numWords); j++); 
return j; 

} 

int mergeArray(char *** Array 1 , char **Array2, int numArrayl, int numAiray2) { 
int i; 

for (i = 0; i < numArray2; i++) 

if (! inArray((* Array 1), Array2[i], numArrayl)) 

addWord(Arrayl, Array2[i], -H-numArrayl); 

return numArrayl ; 
} 



62 

728851 vl 



PATENT 
Docket No.; 4428-4001 



int readValues(char *str, char **array) 

{ 

inti,j = 0, c; 
int state; 

const int out = 0, in = 1 ; 

state = out; 

for (i = 0; (c = str[i]) != 0; i++) 
{ 

if (!isalnum(c)) /* alfa-numeric to read numbers also */ 

{ 

State = out; 

str[i] = 0; /* word is over end it with null */ 

} 

else 

{ 

str[i] = tolower(c); 
if (state = out) 

{ 

state = in; 

array [j++] = str + i; /* word started, store the ptr.*/ 

} 
} 

} 

return j; 
} 

void sortArray(char *allwords[], int numwords) { 
int i = 0; 
intj = 0; 
char *tmp; 

for (i = 0; i < numwords; -Hhi) 
for (j = i + 1 ; j < numwords; -H-j) 
if (strcmp(allwords[i], allwords[j]) > 0) { 
tmp = allwords[i]; 
allwords[i] = allwords[j]; 
allwords[j] = tmp; 

} 

} 

loadStopWords( char * filename) { 
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FILE * fij; 

char tmpWord[50]; 

int wordLen = 0; 

numStopWord = 0; 

= fileOpen(filename,"r"); 
stop Words = NULL; 

while(( wordLen = fetch Word(fp, tmpWord)) != 0) 

addWord(&stopWords, tmpWord, -H-numStopWord); 

} 

FILE * fileOpen(char * filename, char *mode) 

{ 

FILE * fp; 

if ((^ = fopen(filename, mode)) = NULL) { 
perror(filename); 
exit(l); 
} 

return fp; 

} 

addWord(char ***cArray, char * word, int c) 

{ 

*cAiTay = (char **) realloc(*c Array, c * sizeof(char *)); 
(*cArray)[c - 1] = strdup(word); 

} 

int removeZeros(int *intArray, int numint) 

{ 

intij; 

for (i = 0; i < numint; 1++) 
{ 

if(intArray[i] = 0) 

{ 

for (j = i + 1 ; j < numint; j++) 
if(intArray[j] !=0) 

{ 

intArray[i] = intArray[j]; 
intArrayU] = 0; 
break; 

} 
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} 

} 

/* get count of filtered integers */ 

for (j = 0; (intArraylj] !- 0) && G < numint); j++); 

return j; 

} 

/*************************************************^ 

Newly added functions ( for further reducing the code ) 
*****************************************************^ 

int breakStr(char * str, char **strarray) 

{ 

char c, *tmpstr; 
int i, j = 0; 
int state; 

const int out = 0, in = 1 ; 

/* Seperate the sentence into individual words */ 
tmpstr = strdup(str); 

state = out; 

for (i = 0; (c - tmpstr[i]) != 0; i++) 
{ 

if (!isalpha(c)) 
{ 

state = out; 
tmpstr[i] = 0; 

} 

else 

{ 

tmpstr[i] = tolower(c); 
if (state = out) 
{ 

state = in; 

strarrayO++] = tmpstr + i; 

} 
} 

} 

return j; 

} 

/* remove stop Words */ 

filters top Words(char ** strarray, int numWords) 
{ 
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int i; 

for (i = 0; i < numWords; i++) 

if (inArray(stop Words, strarray[i], numStopWord)) 
strarray[i] = NULL; 

} 

/* remove duplicates */ 

filterDuplicates(char ** strarray, int numWords) 

{ 

int i; 

for (i = 0; i < numWords; i++) 

if (strarray[i] != NULL && inArray(strarray, strarray [i], i)) 
strarray[i] = NULL; 

} 

int loadFormsList( char ^filename) 

{ 

char buf[256]; 
FILE *fp; 
int len, i; 

fp = fileOpen(filename, "r"); 

Fprompts = NULL; 
numPF = 0; 

while (fgets(buf,255,^) != NULL) 
{ 

len = strlen(buf); 
for (i = 0; i < len; 

if(buf[i] = ':') 
{ 

bufti] = 0; 

break; 

} 

if(i=len) 
{ 

fprintf(stderr, "Error in Prompt list\n"); 

exit(O); 

} 

allTrim(buf); 
allTrim(buf + i + 1); 
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Fprompts = (char ***)realloc(Fprompts, (++numPF)*sizeof(char **)); 
Fprompts[numPF-l] = (char **)malloc(2 * sizeof(char *)); 
Fprompts[numPF-l][0] = strdup(buf); 
Fprompts[numPF- 1 ] [ 1 ] = strdup(buf + i + 1 ); 

} 

fclose(fp); 
return numPF; 

} 

int loadFonns(char * filename) 
{ 

int i, j, formcount = 0; 
FILE *fp; 

char bupO], **namelist = NULL; 
formlist = NULL; 

numForms = 0; ^ 

fp = fileC)pen(filename, "r"); 
while(fgets(buf,79,fp) !=NULL) 
{ 

if(buf[0] = r) 
{ 

for(i = 0; buf[i]; 

if(buf[i] = r ||buf[i] = T) 
buf[i]="; 

allTrim(buf); 

addWord(&namelist, buf, ++fomicount); 
} 

} 

for ( i = 0; i < formcount; i-H-) 

{ 

formlist = (struct form **)realloc(formlist, (++numForms) * sizeof(struct form *)); 
formlist[numForms - 1] = (struct form*)malloc(sizeof(struct form)); 
loadForm(fip , formlist[n\imFonns - 1], namelist[i]); 
} 

fclose(fp); 
return numForms; 

} 

int allTrim (char * str) 
{ 

int i, j, sf, tabs; 
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for (i = tabs = 0; isspace(str[i]) && str[i]; 

tabs += (str[i]= V)? 1:0; 
for(j =sf=0;str[i];i-H-,j++) 

str[j] = iscntrl(str[i])? ' '; str[i]; 
for(str[j-] = 0; isspace(str[j]) && j > 0; str[j--] = 0); 
return tabs; 

} 

int createArray (char * str, char ** array) 
{ 

int count; 

count = breakStr(str, array); 

return processArray(array, count, 1); 

} 

int process Array(char ** array, int count, int sflag) 
{ 

if(sflag) 

filterStopWords(array, count); 
stemArray(array, count); 
filterDuplicates(array, count); 
return removeNulls(array, count); 

} 



stemlib,c: This program contains functions related to stemming algorithim 
/* This is the Porter stemming algorithm, coded up in ANSI C by the author. 
It may be be regarded as cononical, in that it follows the algorithm presented 
in Porter, 1980, An algorithm for suffix stripping. Program, Vol, 14, no. 3, 
pp 130-137, only differing from it at the points maked -DEPARTURE- below. 

See also http://www.tartarus.org/-martin/PorterStenmier 

The algorithm as described in the paper could be exactly rephcated 
by adjusting the points of DEPARTURE, but this is barely necessary, 
because (a) the points of DEPARTURE are definitely improvements, and 
(b) no encoding of the Porter stemmer I have seen is anything Hke 
as exact as this version, even with the points of DEPARTURE! 

You can compile it on Unix with *gcc -03 -o stem stem.c' after which 
*stem* takes a list of inputs and sends the stenmied equivalent to 
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stdout. 

The algorithm as encoded here is particularly fast. 

Release 1 
*/ 

#include <string.h> /* for memmove */ 

#define TRUE 1 
#defme FALSE 0 

/* The main part of the stemming algorithm starts here, b is a buffer 
holding a word to be stemmed. The letters are in b[kO], b[kO+l] ... 
ending at b[k]. In fact kO = 0 in this demo program, k is readjusted 
downwards as the stemming progresses. Zero termination is not in fact 
used in the algorithm. 

Note that only lower case sequences are stemmed. Forcing to lower case 
should be done before stem(...) is called. 

*/ 

static char * b; /* buffer for word to be stemmed */ 
static int k,kOj; /* j is a general offset into the string */ 

/* cons(i) is TRUE <=> b[i] is a consonant. */ 

int cons(int i) 
{ switch (b[i]) 
{ case 'a': case 'e*: case 'i': case 'o*: case 'u*: retum FALSE; 

case y: retum (i=kO) ? TRUE : !cons(i-l); 

default: retum TRUE; 

} 

} 

/* m() measures the number of consonant sequences between kO and j. if c is 
a consonant sequence and v a vowel sequence, and <..> indicates arbitrary 
presence, 

<c><v> gives 0 
<c>vc<v> gives 1 
<c>vcvc<v> gives 2 
<c>vcvcvc<v> gives 3 
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*/ 

int m() 
{ intn = 0; 

int i = kO; 

while(TRUE) 

{ if (i >j) return n; 
if (! cons(i)) break; 

} 

i++; 

while(TRUE) 
{ while(TRUE) 
{ if(i>j) return n; 

if (cons(i)) break; 

i++; 

} 

i-H-; 
n++; 

while(TRUE) 

{ if (i >j) return n; 

if (! cons(i)) break; 

i-H-; 

} 

i++; 

} 

} 

/* vowelinstemO is TRUE <=> kO,...j contains a vowel */ 
int vowelinstemQ 

{ int i; for (i = kO; i <= j; i-H-) if (! cons(i)) return TRUE; 
return FALSE; 

} 

/* doublec(j) is TRUE <=> contain a double consonant. */ 

intdoublec(intj) 

{ if (j <kO-i-l) return FALSE; 

if (b[j] != b[j-l]) return FALSE; 

return cons(j); 

} 
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/* cvc(i) is TRUE <=> i-2,i-l,i has the form consonant - vowel - consonant 
and also if the second c is not w,x or y. this is used when trying to 
restore an e at the end of a short word. e.g. 

cav(e), lov(e), hop(e), crim(e), but 
snow, box, tray. 

*/ 

int cvc(int i) 

{ if (i < kO+2 II !cons(i) || cons(i-l) || !cons(i-2)) return FALSE; 
{ intch = b[i]; 
if (ch = 'w' II ch = 'x' II ch — y) return FALSE; 

} 

return TRUE; 

} 

/* ends(s) is TRUE <=> kO,...k ends with the string s. */ 

int ends(char * s) 
{ int length = s[0]; 

if (s[length] != b[k]) return FALSE; /* tiny speed-up */ 

if (length > k-kO+1) return FALSE; 

if (memcmp(b+k-length+l,s+l, length) != 0) return FALSE; 

j = k-length; 

return TRUE; 

} 

/* setto(s) sets (j+l),..-k to the characters in the string s, readjusting 
k. */ 

void setto(char * s) 
{ int length = s[0]; 

memmove(b+j + 1 ,s+ 1 ,length); 

k = j+length; 

} 

/* r(s) is used further down. */ 

void r(char * s) { if (mQ > 0) setto(s); } 

/* steplabO gets rid of plvuals and -ed or -ing. e.g. 
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caresses -> caress 
ponies -> poni 
ties -> ti 
caress -> caress 
cats -> cat 

feed -> feed 
agreed -> agree 
disabled -> disable 



matting -> mat 
mating -> mate 
meeting -> meet 
milling -> mill 
messing -> mess 

meetings -> meet 

*/ 

void steplabQ 
{ if(b[k] = 's') 
{ if (ends("\04" "sses")) k -= 2; else 

if (ends("\03" "ies")) setto("\01" "i"); else 

if(b[k-l] !='s*)k--; 

} 

if (ends("\03" "eed")) { if (m() > 0) k--; } else 

if ((ends("\02" "ed") || ends("\03" "ing")) && vowelinstemQ) 

{k=j; 

if (ends("\02" "at")) setto("\03" "ate"); else 
if (ends("\02" "bl")) setto("\03" "ble"); else 
if (ends("\02" "iz")) setto("\03" "ize"); else 
if(doublec(k)) 
{ k-; 
{ intch = b[k]; 
if (ch == '1' II ch = 's' II ch == 'z') k++; 

} 

} 

else if (m() = 1 && cvc(k)) setto("\01" "e"); 

} 

} 

/* steplcQ turns terminal y to i when there is another vowel in the stem. */ 
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void steplcO { if (ends("\01" "y") && vowelinstemQ) b[k] = 'i'; } 



/* step20 maps double suffices to single ones, so -ization ( = -ize plus 
-ation) maps to -ize etc. note that the string before the suffix must give 
m() > 0. */ 

void step2() { switch (b[k-l]) 
{ 

case 'a': if (ends("\07" "ational")) { r("\03" "ate"); break; } 
if (ends("\06" "tional")) { r("\04" "tion"); break; } 
break; 

case 'c': if (ends("\04" "enci")) { r("\04" "ence"); break; } 
if (ends("\04" "anci")) { r("\04" "ance"); break; } 

break; 

case -e': if (ends("\04" "izer")) { r("\03" "ize"); break; } 
break; 

case T: if (ends("\03" "bli")) { r("\03" "ble"); break; } /*-DEPARTURE-*/ 

/* To match the published algorithm, replace this line with 
case '1': if (ends("\04" "abli")) { r("\04" "able"); break; } */ 

if (ends("\04" "alii")) { r("\02" "al"); break; } 
if (ends("\05" "entli")) { r("\03" "ent"); break; } 
if (ends("\03" "eh")) { r("\01" "e"); break; } 
if (ends("\05" "ousli")) { r("\03" "ous"); break; } 
break; 

case 'o': if (ends("\07" "ization")) { r("\03" "ize"); break; } 
if (ends("\05" "ation")) { r("\03" "ate"); break; } 
if (ends("\04" "ator")) { r("\03" "ate"); break; } 
break; 

case 's': if (ends("\05" "alism")) { r("\02" "al"); break; } 
if (ends("\07" "iveness")) { r("\03" "ive"); break; } 
if (ends("\07" "fulness")) { r("\03" "ful"); break; } 
if(ends("\07" "ousness")) {r("\03" "ous"); break; } 
break; 

case 't': if (ends("\05" "aliti")) { r("\02" "al"); break; } 
if (ends("\05" "iviti")) { r("\03" "ive"); break; } 
if (ends("\06" "biliti")) { r("\03" "ble"); break; } 
brealc* 

case 'g': if (^ds("\04" "logi")) { r("\03" "log"); break; } /*-DEPARTURE- 
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/* To match the pubHshed algorithm, delete this Hne */ 
}} 

/* step3() deals with -ic-, -full, -ness etc. similar strategy to step2. */ 
void step30 { switch (b[k]) 

case 'e': if (ends("\05" "icate")) { r("\02" "ic"); break; } 
if (endsC'\05" "ative")) { r("\00" ""); break; } 
if (ends("\05" "aUze")) { r("\02" "al"); break; } 

break; 

case 'i': if (ends("\05" "iciti")) { r("\02" "ic"); break; } 
break; 

case T: if (ends("\04" "ical")) { r("\02" "ic"); break; } 
if (ends("\03" "ful")) { r("\00 ); break; } 
break; 

case 's': if (ends("\04" "ness")) { r("\00" ""); break; } 
break; 

}} 

/* step4() takes off -ant, -ence etc., in context <c>vcvc<v>. */ 

void step40 

{ switch (b[k-l]) 

{ case 'a': if (ends("\02" "al")) break; return; 
case 'c': if (ends("\04" "ance")) break; 

if (ends("\04" "ence")) break; return; 
case 'e': if (ends("\02" "er")) break; return; 
case 'i': if (ends("\02" "ic")) break; return; 
case T: if (ends("\04" "able")) break; 

if (ends("\04" "ible")) break; return; 
case 'n': if (ends("\03" "ant")) break; 

if (ends("\05" "ement")) break; 

if (ends("\04" "ment")) break; 

if (ends("\03" "ent")) break; return; 
case V: if (ends("\03" "ion") && (bO] = 's' || b^] = 't')) break; 

if (ends("\02" "ou")) break; return; 

/* takes care of -ous */ 
case 's': if (ends("\03" "ism")) break; return; 
case'f: if (ends("\03" "ate")) break; 

if (ends("\03" "iti")) break; return; 
case 'u': if (ends("\03" "ous")) break; return; 
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case V: if (ends("\03" "ive")) break; return; 
case 'z': if (ends("\03" "ize")) break; return; 
default: return; 

} 

if(mO>l)k=j; 



/* step5() removes a final -e if mQ > 1, and changes -11 to -1 if 
mO>l.*/ 

void stepSO 
{j=k; 

if(b[k] = 'e') 

{ inta = mO; 
if (a > 1 II a == 1 && !cvc(k-l)) k-; 

} 

if (b[k] = T && doublec(k) &<& mQ > 1) k-; 

} 

/* In stem(p,i J), p is a char pointer, and the string to be stemmed is from 
p[i] to p[j] inclusive. Typically i is zero and j is the offset to the last 
character of a string, (p[j+l] = *\0'). The stemmer adjusts the 
characters p[i] ... p[j] and returns the new end-point of the string, k. 
Stemming never increases word length, so i <= k <= j. To turn the stemmer 
into a module, declare 'stem* as extem, and delete the remainder of this 
file. 

*/ 

int stem(char * p, int i, int j) 

{ b = p; k = j; kO = i; /* copy the parameters into statics */ 
if (k <= kO+1) return k; /*-DEPARTURE-*/ 

/* With this line, strings of length 1 or 2 don't go through the 
stemming process, although no mention is made of this in the 
published algorithm. Remove the line to match the published 
algorithm. */ 

steplabO; steplcQ; step20; step3(); step40; stepSQ; 
return k; 

} 

/* stemmer definition ends here */ 
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stemArray(char **list, int arrayLen) 
{ 

int i; 

for (i = 0; i < arrayLen; i-H-) 
if(list[i] !=NULL) 

stemWord(list[i]); 

} 

stemWord( char * s) 
{ 

s[stem(s,0, strlen(s) - 1) + 1] = 0; 
} 



dialogic: This is main program of dialog module 

/************************************************* 

dialog.c : The main function for the interactive dialog program, loads all 
the global arrays and variables before calling the interacitve function. 

Arguments are: 

L The Configuration file for Thesaurus, contains Prompts, index, 

basic thesaurus etc. 
2 The Learning Thesaurus. - used to store learnt words and to refer to them. 
************************************************* 

#include <stdio.h> 
#include <string.h> 
#include "arraylib.h" 

int numColumn, numRov^, numhidex, numMenu; 
int startPoint, eofFlag, topValues; 

char **rowTerms, **columnTerms, **prompts, **stopWords; 

float **matrix, **cosine, phoneThreshold, webThreshold; 

int **indexList, **menuList, **thesaurus; 

int numStopWord, numOrgRow; 

int numForms, numPF; 

struct form **formUst; 

char ***Fprompts, *fonnfile; 

int ** scoring, numScore = 0; 

char *cfg, *lcfg, *fdoc, *xdoc, *sdoc; 

int minPromptCount = 1, timeout = 30; 

void Interactive(char *); 
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main(int argc, char *argv[]) 

{ 

int i = 0; 

/*if(argc!= 5) 
{ 

printf("Usage Instructions: dialog config_file leam_file\n"); 

printf("*** Exiting, goodbye.\n"); 

exit(l); 

}*/ 

if (argc != 2) 
{ 

printf("Usage Instructions: d <ini-file>\n"); 
printft"*** Exiting, goodbye.W); 
exit(l); 

} 

readini(argv[l]); 
formfile = fdoc; 
loadStopWords(sdoc); 
numPF = loadFonnsList(xdoc); 
numForms = loadFomis(fdoc); 
loadData(cfg, Icfg); 
Interactive(lcfg); 

} 

/****************************************************** 

loaddata : This function will read the configuration files and load the 

information into the relevant global arrays. 
****************************************************************** 

loadData(char *filenm, char *file2) 
{ 

char bufI256], word[20]; 
int i,j, k, 1; 
int numext; 
FILE *fp, *f2; 

/******************* Qpg„ configuration file ********************/ 
fp = fileOpen(filenm, "r"); 

Qpgj^ leam(extended thesaurus) file ****************/ 
a = fileOpen(file2, "r"); 



728851 vl 



77 



PATENT 
Docket No.: 4428-4001 

prompts - columnTerms = rowTerms = NULL; 
scoring = thesaurus = indexList = menuList = NULL; 

/* read data in the arrays */ 

numMenu = loadMenuTree(fp, "[MENUTREE]"); 

numlndex = readArray(fp, "[PROMPTS]", &prompts, 1, NULL, 0, 0); 

numColumn = readArray(fp, "[INDEX]", &columnTerms, 1, &indexList, numlndex, 0); 

numOrgRow = readArray(fp, "[THESAURUS]", &rowTerms, 1 , &thesaurus, numColumn, 0); 

numRow = readArray(f2, "[EXT-THESAURUS]", &rowTerms, 1, «&thesaurus, numColumn, 

nimiOrgRow); 

numScore = readArray(G, "[SCORING]", NULL, 0, &scoring, numColumn +1,0); 

fclose(fp); 
fclose(f2); 

} 

********************************************* ****** 

readArray : Reads the file and fills the rows and columns of the given arrays 
**************************************************************************/ 

int readArray(FILE *fp, char *head, char ***ch_array, int ccount, int ***int_array, int icount, int 

sp) 

{ 

char buf[256]; 

int i, j, start = 0, wc = 0; 

int k, c; 

char **tmparray; /*To store the pointers to the words/numbers fi-om the string*/ 
c = sp; 

if (icount !=0) 

tmparray = (char **)malloc((icount + 1) * sizeof(char *)); 

fseek(fp, 0, 0); /* Go to Top */ 

while (fgets(buf, 255, fp) !- NULL) /* read lines till end of file */ 
{ 

allTrim(buf); 
j = strlen(buf); 

if (bufU - 1] = buflj - 1] = 0; 
if (start) 
{ 

if (strlen(buf) == 0) /* if blank line, stop reading */ 
break; 

if (icount = 0) /* i.e. no integer array */ 
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addWord(ch_array, buf, ++c); 
else /* read first word string */ 

{ /* rest are columns of int array */ 
wc = readValues(buf, tmparray); 

C++; 

(*int__array) = (int **)realloc(*int_array, c * sizeof(int *)); 
(*int_array)[c - 1] = (int *)malloc(icount * sizeof(int)); 
if (ccount != 0) 

addWord(ch_array, tmparray[0], c); 

else 

(*int_array)[c • 1][0] = atoi(tmparray[0]); 
for (k = 1 ; k < icount; k++) 
if(k<wc) 

(*int_array)[c - l][k - ccount] = atoi(tmparray[k]); 

else 

(*int_array)[c - l][k - ccount] = 0; 

} 

} 

else 

if (!strcmp(head, buf)) 
start = 1; 

} 

return c; 

} 

******************************************** 

loadMenuTree : loads the menutree from file to menuList array 
*******************************************************************/ 

int loadMenuTree (FILE *fp, char *head) 
{ 

char buf[256]; 

int i, j, start = 0, count = 0; 

fseek(fp, 0, 0); 

while (fgets(buf, 255, fp) != NULL) 
{ 

j = strlen(buf); 
if(buf[j- l]='\n') 
buf[j-l] = 0; 

if (start) 
{ 

if(strlen(buf) = 0) 

break; 

menuList = (int **)realloc(menuList, (count + 1) * sizeof(int *)); 
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menuList[count] = (int *)raalloc(3 * sizeof(int)); 
sscanf(buf, "%d,%d,%d\n", &menuList[count][0], 
&menuList[count][l],&menuList[count][2]); 
count++; 

} 

else 

if (!strcmp(head, buf)) 
start =1; 

} 

return count ; 

} 



readini(char * filenm) 

{ 

FILE * fp; 

char buf[80], key[80], value[80], comment[80]; 
int cnt; 

if ((fp=fopen(filenm,"r"))=NULL) 
{ 

perror(filenm); 
exit(l); 

} 

while (fgets(buf,79,fp)!=NULL) 

{ 

sscanf(buf,"%s %s %s",key, value, comment); 
if (!strcmp(key, "sdoc")) 

sdoc=strdup(value); 
if(!strcrap(key, "fdoc")) 

fdoc=strdup(value); 
if (!strcmp(key, "xdoc")) 

xdoc=strdup(value); 
if(!strcmp(key, "cfg")) 

cfg=strdup(value); 
if(!strcmp(key, "Icfg")) 

lcfg=strdup(value); 
if (!strcmp(key, "minprompt")) 

minPromptCount=atoi(value); 
if (!strcmp(key, "timeout")) 

timeout=atoi(value); 

} 

} 
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interactive^ : This program contains funtions related to user interaction 

Interactive : function to accept a sentence from the user and then 
generate the response. 

thesaurusFlag = is 1 if there is atleast 1 thesaurus/learned word in query 
updateFlag = is set to 1 if the program needs to learn (i.e. main menu was 

selected during the prompt navigation) 
interPrompts = Intersection of prompts 
unionPrompts = Union of prompts 
interUnionPrompts = Intersection of Union 
numlnter = number of prompts in InterPrompts 
numlnterUnion = num of prompts in Intersection of Union 
numUnion = num of prompts in Union 
numUnknown = num of unknovra words 

#include <stdio.h> 
#include <signal.h> 
#include <string.h> 
#include <unistd,h> 
#include "globalvar.h" 
#include "arraylib.h" 
#include "forms.h'* 

#defme max(a,b) (a > b)? a: b 
#defme min(a,b) (a < b)? a: b 
#defme swap(a,b) (a ^= b, b ^= a, a ^= b) 

extern int numScore, **scoring; 

int UpdateFlag = 0, leamFlag, numQueryList = 0; 

FILE *lf, *pf; 

char ** uWList=NULL, *queryTerms[50]; 
int uWNum; 

extern int minPromptCount, timeout; 

char query[256], **queryList = NULL; 

char *af&mWords[] = { "yes", "right", "correct"}; 

char *negWords[] = { "no", "neither"}; 

extem char * fdoc; 

int otheFlag = 0; 

int unknown Words[20], numQuery = 0, numUnknown; 
char **uWords; // Added this array to facilitate learning vs^en if lateral shift 
int numUW; // Added this to facilitate learning wven if lateral shift 
void sayOtherQ; 
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void Interactive(char *flnm) 
{ 

int InterPrompts[20], unionPrompts[20], tlPrompts[20]; 

int interUnionPrompts[20], numlnterUnion, t2Prompts[20], numT2; 

intij, k, 1; 

int start, numUnion, numlnter, numTl; 

int n, selectedPrompt, thesaurusFlag = 0; 
char *interlog, *processlog, c; 

numUnknown = numUW = 0; 
for(i=0; i < 20; i-H-) 

unknown Words[i] = 0; 
uWords=NULL; 

if ((interlog = (char *)getenv("TIMEOUT")) != NULL) 
timeout = atoi(interlog); 

if ((interlog = (char *)getenv("MINPROMPT")) != NULL) 
minPromptCount = atoi(interlog); 

if ((interlog = (char *)getenv("INTERLOG")) = NULL) 
interlog = "test.html"; 

if ((processlog = (char *)getenv("PROCESSLOG")) = NULL) 
processlog = "process.html"; 

signal(SIGALRM, &sayOther); 
If = fileOpen(interlog,"w"); 

pf = fileOpen(processlog,"w"); 

fprintf(lf, "<HTMI>\n<riTLE>%s</TITLE>\n<BODYxFONT SIZE=5>\n", interlog); 
^rintf(pf, "<HTMl>\n<a'ITLE>%s</TITLE>\n<BODYxFONT SIZE=5>\n", processlog); 

system("clear"); 

printfC'Thank you for calling the New Herald.\n"); 
printf("How may we help you?\n\n"); 
fi3rintf(lf,"\nThank you for calling the New Herald.<BR>"); 
fprintf(lf,"How may we help you. <P>"); 
fgets(query, 255, stdin); /* accept the user input */ 

while (1) 
{ 
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addWord(&queryList, query, -H-numQueryList); 
niimQuery = thesaurusFlag = 0; 
if (strlen(query) = 0) 
break; 

^rintf(lf, "<I> %s</I> <P>", query); 
numQuery = createArray(query, queryTerms); 

/**********************************************************/ 

fprintf(pf, "Terms in Query: "); 
for 0 = 0; j < numQuery; j-H-) 

fprintf(pf, " %s", queryTermsUl); 
^rintf(pf, "<BR>"); 

/**********************************************************/ 

/* initialize InterPrompts and unionPrompts array */ 
for (i = 0; i < 20; i++) 
{ 

t2Prompts[i] = tlPrompts[i] = 0; 

InterPrompts[i] = unionPrompts[i] = interUnionPrompts[i] = 0; 

} 

Start = 1; 

numlnterUnion = numT2 = numTl = numlnter = numUnion = 0; 

/* Scan thru all the words to generate union/intersection of prompts*/ 
for (i = 0; i < numQuery; 1++) 
{ 

/* if not in index words check thesaurus */ 

if (!inArray(colunmTerms, queryTerms[i], numColumn)) 

{ 

leamFlag = numTl = numT2 = 0; 

scanThesaurus(queryTerms[i], tlPrompts, t2Prompts, &numTl, 

&numT2); 

/* if unknown/learned word save it to array */ 
if (leamFlag) 
{ 

unknown Words[numUnknown] = i, numUnknown-H-; 
addWord(&uWords, queryTerms[i], -M-numUW); 
if (numTl == 0 && numT2 = 0) 
continue; 

else 

thesaurusFlag = 1 ; 

} 
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else 

thesaurusFlag = 1; 

} 

else 

{ 

numTl = fetchPrompts(queryTerms[i], tlPrompts); 

numT2 = fetchPrompts(queryTerms[i], t2Prompts); 

^* ********************** ************************/ 

fprintf(pf, "%s (index) :", queryTerms[i]); 
for (j = 0;j< numTl ;]++) 

fprintf(pf, " %d", tlPrompts[j]); 
fprintf(pf, "<BR>"); 
fflush(pf); 

1^!**********************************************/ 
} 

if (start) /* if first word */ 
{ 

numlnter = PromptUnion(InterPrompts, t2Prompts, numlnter, numT2); 
numUnion = PromptUnion(unionPrompts, tlPrompts, numUnion, 

numTl); 

numlnterUnion = PromptUmon(interUnionPrompts, tlPrompts, 
numlnterUnion, numTl); 

start = 0; 

} 



else 



{ 

numlnter = PromptIntersection(InterPrompts, t2Prompts, numlnter, 
numUnion = PromptUnion(unionPrompts, tlPrompts, numUnion, 



nuinT2); 
nirniTl); 

numlnterUnion = PromptIntersection(interUnionPrompts, tlPrompts, 
numlnterUnion, numTl); 

} 

/***************************************************** 

fprintf(pf, "Final Intersection Result: "); 
for (j = 0; j < numlnter; j-H-) 

fprintf(pf," %d", InterPrompts[j]); 
fprintf(pf, "<BR>"); 

^rintf(pf, "Final Intersection of Union Result: "); 
for (j = 0; j < numlnterUnion; jH-+) 
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fprintf(pf, " %d", interUnionPrompts[j]); 
^rintf(pf, "<BR>"); 
Q)rintf(pf, "Final Union Result: "); 
for (j = OJ < numUnion; j++) 

fi5rintf(pf, " Vod", unionPromptsU]); 
fprintf(pf, "<BR>"); 
fflush(pf); 

if (numlnter < minPromptCount && thesaurusFlag) 
{ 

if (numlnterUnion < minPromptCount) 

numlnter = PromptUnion(InterPrompts, unionPrompts, numlnter, 

numUnion); 

else 

numlnter = PromptUnion(InterPrompts, interUnionPrompts, 

numlnter, numlnterUnion); 

} 

^rintf(pf, "Final Selection : "); 

fflush(pf); 

for (j = 0; j < numlnter; j-H-) 

fprintf(pf, " %d", InterPrompts[j]); 
fyrintf(pf, "<BR>"); 
fflush(pf); 

numlnter = orderPrompts(InterPrompts, numlnter); 
numlnter = removeChild(InterPrompts, numlnter); 
// eliminate prompts > 3 
for (j = 3; j < numlnter; j-H-) 
InterPrompts[j] = 0; 
numlnter = min(numlnter, 3); 

fprintf(pf, "Selection After Elimination of descendants: "); 
fflush(pf); 

for 0 = 0; j ^ numlnter; j-H-) 

fprintf(pf, " %d", InterPrompts[j]); 
fprintf(pf, "<BR>"); 
fflush(pf); 

selectedPrompt = GetPrompt(InterPrompts, numlnter); 
if (selectedPrompt = 100) 
continue; 

// if (updateFlag) 

leamThesaurus(selectedPrompt, unknown Words, numUnknown, flnm); 
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updateFlag = 0; 

forO = 0; 0 < numMenu) && (menuList|j][l] != selectedPrompt); j++); 
if(menuList[j][2]>=99) 

{ 

for (i = 0; i < numPF; 
{ 

if (!strcmp(Fprompts[i][l],prompts[selectedPrompt - 1])) 

{ 

for(k = 0; k < numForms; k++) 

if (! strcmp(Fprompts[i][0],formlist[k]->name)) 

{ 

fillForm(fcnrilist[k], queryList, numQueryList); 

processFonn(formlist[k]); 

break; 

} 

break; 

} 

} 

if (i == niiinPF) 
{ 

system("clear"); 

printf("\nYour query has been understood,\n"); 

printf("Please wait to be transferred to the relevant department.\n\n"); 

^rintf(If,"<P>Your query has been understood.<LI>"); 

fprintf([lf,"Please wait to be transferred to the relevant department,<HR>"); 

break; 

} 

} 

else 

{ 

printf("\n%s\n\n",prompts[menuList|j][2] - 1]); 
fprintf(lf, "\n<P>%s<HR>",prompts[menuList[j][2] - 1]); 

} 

// modified for the loop 
printf("Do you have another query?\n\n"); 
fgets(query,80,stdin); 
if (!chkNegtn(query)) 

{ 

for(i = 0; i < numQueryList; i+-i-) 

free(queryList[i]); 

for(i = 0; i < numForms; i-H-) 

free(fonnlist[i]); 
free(formlist); 
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free(queryList); 
queryList = NULL; 
numForms = loadForms(fdoc); 
numQueryList = 0; 

//printf("Please tell us your query, \n\n"); 

//fgets(query ,2 5 5 ,stdi n) ; 

continue; 

} 

system("clear"); 

printf("\nThank you for calling.\nGoodbye.\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\^^ 
break; 

} 

fprintf(lf, "</HTML>\n</BODY>\n"); 
fprintf(pf, "<yHTML>\n</BODY>\n"); 
fclose(lf); 
fclose(pf); 

} 

int scanThesaurus(char *word, int *tlPrompts, int *t2Prompts, int* nl, int * n2) 
{ 

int i, j, k = 0, 1; 
intm, tp[20], sflg=l; 

for (i = 0; i < 20; i++) 

tlPrompts[i] = t2Prompts[i] = tp[i] = 0; 

for (1 = 0; 1< numRow; 1++) 

if (!strcmp(word, rowTenns[l])) 
break; 

/* if the word is not present in thesaurus */ 
if (1 == numRow) 

{ 

fprintf(pf, "%s (unknown) <BR>", word); 
leamFlag = 1 ; 
return 0; 

} 

else 

{ 

if (1 >= numOrgRow) 

{ 

fprintf(pf, "%s (leamed):<BR>", word); 
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leamFlag = 1 ; 
} 

else 

fprintf(pf, "%s (thesaurus):<BR>", word); 

for 0 = 0; thesaurus[l][j] && j < numRow; j-H-) 
{ 

m = fetchPrompts(columnTerms[thesaurus[l][j] - 1], tp); 

^**** ************************************* *************** 

fprintf{pf, "<LI>%s (index) :", columnTenns[thesaurus[l]|j] - 1]); 
for (k = 0; k < m; k++) 

fprintf(pf, " %d", tp[k]); 
fprintf(pf, "<BR>"); 

*nl = PromptUnion(tl Prompts, tp, *nl, m); 
if(sflg) 

{ 

*n2 = PromptUmon(t2Prompts, tp, *n2, m); 

sflg = 0; 

} 

else 

{ 

*n2 = PromptIntersection(t2Prompts, tp, *n2, m); 
} 

} 

fprintf(pf, "Union Result: "); 
for(k = 0;k<*nl;k-H-) 

fprintf(pf, " %d", tlPrompts[k]); 
fprintf(pf, "<BR>"); 
fprintf(pf, "Intersection Result: "); 
for(k = 0;k<*n2;k-H-) 

fprintf(pf, " %d", t2Prompts[k]); 
fprintf(pf, "<BR>"); 
} 

return k; 

} 

y**********«************************************************** 

PromptUnion : does a union of arrays pointed by pi and p2 and 
stores in p 1 . returns the total elements in result 

****a|c*****************************9|c**************************y 
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int PromptUnion(int *pl, int *p2, int nl, int n2) 
{ 

int i,j; 

for (i = 0; i < n2; 
{ 

for(j = 0;j<nl;j-H-) 

if(pl[j]=p2[i]) 

break; 
ifa = nl) 

{ 

pl[j]=p2[i]; 
nl-H-; 

} 

} 

return nl; 

} 

^******************************************************************** 

Promptlntersection : does a intersection of arrays pointed by pi and p2 and 

stores in pi . returns the total elements in result 
************************************************************** 

int PromptIntersection(int *pl, int *p2, int nl, int n2) 
{ 

inti,j; 

for(i = 0;i<nl;i-H-) 
{ 

for(j=0;j<n2;j++) 

if(pl[i]=p2a]) 
break; 

if(j ==n2) /* not there*/ 
{ 

for(j=i;j<nl;j++) 

pl[j]=plD + l]; 

nl-; 

i-; 
} 

} 

return nl; 

I***************************************** 

fetchPrompts : Will fetch all the prompts for 'word' into 

Arraylist pointed by tl Prompts; 
****************************************************** 
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int fetchPrompts(char *word, int *tl Prompts) 
{ 

intij, k, 1; 

for (i = 0; i < 20; i++) 

tlPrompts[i] = 0; 
if ((i = inArray(columnTenns, word, numColumn)) == 0) 

return 0; 

i-S 

for 0 = 0; (tlPrompts[j] = indexList[i][j]) && (j < numlndex); j-H-); 

return j; 

} 

********************************** *************** 

GetPrompt: Returns the final prompt selected by user 

****************************************************************/ 

int GetPrompt(int *Parray, int pent) 

{ 

intij,k, 1; 

int mmflag = 0, af=0; 
char ans[80]; 

while (1) 
{ 

system("clear"); 
printf("\n"); 
fi3rintf(lf, "<P>"); 

// Removed the comments to reintroduce last prompt 
if (pent = 1 && isLeaf(Parray[0]) && numUnknown > 0) 
af= 1; 

// 

if ((pent > 1) II (pent = 1 && af-= 1)) 
{ 

// sortPrompts(Parray, pent); 
orderPrompts(Parray, pent); 
for (i = 0; i < pent; 
{ 

printf("%s\n\n", prompts[Parray[i] - 1]); 
fprintf(lf, "<LI>%s", prompts[Parray[i] - 1]); 

} 

if (Immflag) 

{ 

otheFlag = 0; 
alarm(timeout); 
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} 

fgets(ans, 80, stdin); /* accept the user input */ 
alami(O); 

fprintf(lf, "<P><I>%s</I><P>", ans); 
fflush(lf); 

if (otheFlag= 1 && chkAfrm(ans)) 
j=0; 

else 

{ 

if (chkNegtn(ans) «&& otheFlag != 1) 
j = 0; 

else 
{ 

addWord(&queryList, ans, ++numQueryList); 
j = clikAns(ans, Parray, pent); 

} 

OtheFlag = 0; 



f(j=-99) 

updateFlag = 1; 
return 100; 



fa<o) 



else 

if(j = 



else 



pent = removeZeros(Parray,pcnt); 
continue; 



mmflag = 0; 



= pcnt; 
0) 



pent = getNodes(j, Parray); 
mmflag = updateFlag = 1; 



if(isLeaf(ParrayU-l])) 
{ 

return Parray[j - 1]; 

} 
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else 

pent = getNodes(Parray[j - 1], Parray); 

} 

af = 1; 
} 

} 

^* ****************************************** *********** 

isLeaf: Returns 1 if *node' is a leaf in the menutree, else 0 

*********************************************************************/ 
int isLeaf(int node) 

{ 

int i; 

for (i = 0; i < numMenu; i++) 

if (menuList[i] [ 1 ] node) 
break; 
if (i = numMenu) 

return 0; 
return menuList[i][2]; 

} 

int getNodes(int pnode, int *parray) 
{ 

intij; 

for (i = 0, j = 0; i < numMenu; i++) 
if (menuList[i][0] = pnode) 

{ 

pairayU] = menuList[i][l]; 

} 

parrayU] = 0; 
return j; 

} 

^***************************************************************************** 

leamThesaurus : re-writes the thesaurus with releamed pattern and newly 
learned word. 

*****************************************************************************/ 

leamThesaurus(int pmpt, int unknownWords[], int numUnknown, char *flnin) 

{ 

intiJ, k,l; 
FILE *fp; 

int *tmpList, tmpCount; 
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/* create and initialize a tmp Array */ 
tmpList = (int *)calloc(numColumn, sizeof(int)); 
for (i = tmpCount = 0; i < numColumn; i++) 
tmpList[i] = 0; 

/* scan thru the query words and gather a Hst of unique keywords in tmp array*/ 

tmpCount = getKeyWords(queryTerms, numQuery, tmpList); 

/* Locate the row for select prompt, if not create new row */ 

for (k = 0; k < numScore && scoring[k][0] != pmpt; k-H-); 

if (k >= numScore) 

{ 

scoring = (int **)realloc(scoring, (k + 1) * sizeof(mt *)); 
scoring[k] = (int *) malloc((numColumn + 1) * sizeof(int)); 
for (} = 0;'}<= numColumn; j-H-) 

scoring[k][j] = 0; 
numScore-H-; 

} 

scoring[k][0] =pmpt; 

for (j = 0; j < tmpCount; j++) 

scoring[k] [tmpList[j ]]-H-; 

/************************************************* 

for (i = tmpCount = 0; i < numColumn; i-H-) 
tmpList[i] = 0; 

for (j = i = 0; j < numColumn; j++) 
{ 

for (k - 0; k < numlndex && indexList[j][k] != 0; k++) 
if (indexList[j][k] = pmpt) 
break; 

if (k < numlndex && indexListU][k] != 0) 
{ 

tmpList[i] = j + 1; 
i++; 

} 

} 

tmpCount = i; 

fp = fileOpen(flnm, "w"); 

fi)rintf(pf, "<BRxB>Uamed words</BxBR>"); 

fprintf(fp, "[%s]\n", "EXT-THESAURUS"); 
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for (i = numOrgRow; i < numRow; i++) 
{ 

fprintf(fp, "%s: rowTenns[i]); 

if (updateFlag && inArray(uWords, rowTerms[i], numUW)) 
{ 

^rintf(pf, "%s (releamed)<BR>original: ", queryTerms[unknownWords[j]]); 
for (k = 0; k < numColumn; k++) 

{ 

if(thesaurus[i][k] !=0) 

iprintf(pf, " %d", thesaurus[i][k]); 
if(thesaurus[i][k]=0) 

break; 

} 

fprintf(pf, "<BR>"); 

k = PromptUnion(thesaurus[i], tmpList, k, tmpCount); 
fprintf(pf, "new :"); 
for(j = 0;j<k;j++) 

fprintf(pf, " %d", thesaurus[i][j]); 
fprintf(pf, "<BRxBR>"); 

} 

for (j = 0; j < numColumn; j++) 

{ 

if (thesaurus[i][j] = 0) 
break; 

fprintf(fp, "%d,", thesaurus[i][j]); 

} 

fprintf(fp, "\n"); 
} 

for (i = 0; updateFlag <&& i < numUW; i+-h) 
{ 

if (inAiTay(rowTerms, uWords[i], numRow)) 
continue; 

fprintf(fp, "%s: uWords[i]); 

fi>rintf(pf, "%s(new-Ieamed) :", uWords[i]); 

addWord(&rowTerms, uWords[i], ++numRow); 

thesaurus = (int **)realloc(thesaurus, numRow * sizeof(int *)); 

thesaurus[numRow - 1] = (int *)malloc(numColumn * sizeof(int)); 

for (j = 0; j < numColumn; j-i-+) thesaurus[numRow = 0; 

for (j = 0; j < tmpCount; j-H-) 

{ 
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thesaurus[numRow - 1]U] = tmpList[j]; 
fprintf(fp, "%d,", tmpListUl); 
fprintf(pf, " %d", tmpList[j]); 

} 

fprintf(fp, "\n"); 
fi5rintf(pf, "<BRxBR>"); 

} 

fiDrintf(fp, "\n"); 

/* write the scoring in the file */ 
fprintf(fp, "[%s]\n", "SCORING"); 
for (i = 0; i < numScore; 

{ 

fprintf(fp, "%d,", scoring[i][0]); 
for(j = 1 ; j <= numColumn; j++) 

fprintf(fp, "%d,", scoring[i][j]); 
fprintf(^, "\n"); 
} 

^rintf(Q), "\n"); 
fclose(fp); 

} 

removeChild: removes descendents of all the elements from the list 
**************************************************** 

int removeChild(int * array, int tot) 
{ 

inti,j,k, cnt = 0; 

int *tmparray, m = 99; 

tmparray = (int *)calloc(numIndex, sizeof(int)); 

/* Remove any prompts that are responses rather than choices */ 
for(i = 0;i<tot; i++) 
{ 

for(j = 0; j < numMenu; j-H-) 

if (menuList|j][l] = array[i] && menuList[j][2] = 100) 
array[i] = 0; 

} 

/* Remove any prompts that are root node and have a child which is not a leaf rather than 
choices */ 
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for (i = 0; i < tot; i++) 
{ 

if (array[i] = 0) /* already removed so go to next */ 
continue; 

/* if (isLeaf(array[i])) 
continue; */ 

m = array[i]; 
while(l) 
{ 

for(j = 0; j < numMenu; j++) 

if (menuList[j][l] = m) 
break; 
if(menuList[j][0] = 0) 

break; 
m = menuList|j][0]; 

} 

if ( m != array[i]) 
{ 

for(j = 0;j <tot;j++) 
{ 

if (arrayU] == m) 
arrayjj] = 0; 

} 

} 

} 

for (i = 0; i < tot; 
{ 

if (array[i] = 0) /* already removed so go to next */ 
continue; 

for (j = 0; j < numlndex; j-H-) /* initialize tmparray */ 
tmparraylj] = 0; 

cnt = getChildren(array[i], tmparray); /* get children & grand-children of i */ 
for 0 = 0; j < tot; j++) /* scan thru the array to check for child */ 

if 0 != i) /* ignore self from checking */ 

for (k = 0; k < cnt; k++) 

if (arrayjj] = tmparray[k]) 

{ 

array [j] = 0; /* if j is child of i, make it 0 */ 
break; 
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} 

} 

/* Shift All non-zeroes upwards */ 
for (i = 0; i < tot; 

{ 

if(array[i] = 0) 
{ 

forO-i + l;j<tot;j-H-) 
if(arraylj] !=0) 
break; 

if(j <tot) 
{ 

array[i] = array[j]; 
arrayUi = 0; 
} 

} 

} 

/* count no of elements */ 
for(j = 0;j<tot;j++) 

{ 

if(arraylj] = 0) 
break; 

} 

return j; 

} 

^H(******** ************************** ******************4!* 

getChildren: fetches all the descendents of pmpt into array 

at:3|e** ****************************************************** **********/ 

int getChildren(int pmpt, int * array) 

{ 

intij,k, 1; 
intt,tl,t2; 

int *tmparrayl, *tmparray2; 

if (isLeaf(pmpt)) /* if node is leaf no children so return 0 */ 
return 0; 

tmparrayl = (int *)calloc(numIndex, sizeof(int)); /* child of child in every loop */ 
tmparray2 == (int *)calloc(numIndex, sizeof(int)); /* union of all scanned children */ 
t = tl = t2 = 0; 

for (i = 0; i < numMenu; i++) 

{ 
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if (inenuList[i][0] =pmpt&&menuList[i][2] != 100) 
{ 

array[t] = menuList[i][l]; 

tl - getChildren(aiTay[t], tmparrayl); 

t2 = PromptUnion(tmpaiTay2, tmparrayl, t2, tl); 

t++; 

} 

} 

t = PromptUnion(array, tmparray2, t, t2); 
return t; 

} 



int chkAns (char * ans, int * Parray, int pent) 
{ 

char locquery[256]; 

int i, j, tmplcnt = 0, tmp2cnt = 0; 

char *resWords[50], start = 'Y'; 

int num Words, tmpArrayl[20], tnipArray2[20]; 

int uwFlag = 0, rowOrColWord = 0; 

strcpy(locquery,ans); 

num Words = breakStr(ans, res Words); 

if ( strcmp(resWords[0],"other") = 0 && strcmp(resWords[l],"options") = 0) 

{ 

return 0; 

} 

num Words = processArray(res Words, num Words, 1); 
for (i = 0; i < 20; 

tmpArrayl[i] = tmpArray2[i] = 0; 
fprintf(pf,"<li>Initiahzed Temp Array\n"); fflush(pf); 

for (i = 0; i < num Words; 

{ 

if (!inArray(columnTenns, resWords[i], numColumn)) 
{ 

if ( ! inArray(ro wTenns,res Words[i],numColunm)) 

{ 

if (!inArray(uWList, resWords[i], uWNum)) 
( 

addWord(&uWList, resWords[i], ++uWNum); 

fflush(lf); 

} 
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else 

{ 

^rintf(pf,"<li>Unknown Word: %s\n",resWords[i]); 
fflush(pf); 

uwFlag = 1 ; /* unKnown word encountered twice */ 
} 

} 

else 

rowOrColWord-f+; 
continue; 

} 

else 

rowOrColWord-H-; 
tmpl cnt = fetchPrompts(resWords[i], tmpArrayl); 
if(start = 'Y') 

{ 

tmp2cnt = PromptUnion(tmpArray2, tmpArrayl, tmp2cnt, tmpl cnt); 

start=TSf; 

} 

else 

tmp2cnt = ProraptIntersection(tmpArray2, tmpArrayl, tmp2cnt, tmplcnt); 

tmp2cnt = PromptIntersection(tmpArray2, Parray, tmp2cnt, pent); 
} 

if (tmp2cnt != 1) 
{ 

if (tmp2cnt = 0 && pent = 1 && numWords = 1) // i.e. only one prompt & 

not selected 

{ 

strcpy(ans, locquery); 
if (chkAfirm(ans)) 
return 1 ; 

} 

if (tmp2cnt > 1) // i.e. multiple prompt selection then do score 
{ 

strcpy(ans, locquery); 

return checkscore(ans, Parray, pent); 

} 



if (uwFlag) 

if(AskforOpO) 

return -99; 



728851 vl 



99 



PATENT 
Docket No.: 4428-4001 



else 

return -1; 

else 

if(rowOrColWord) 
{ 

strcpy(query,locquery); 
return -99; 

} 

} 

for (i = 0; Parray[i]; 

if (PaiTay[i] = tmpArray2[0]) 
return i + 1; 

} 

int AskforOpQ 

{ 

intij ; 

char *resWords[50]; 
int num Words ; 

system("clear"); 

printf("Your request was not understood.\n"); 

printfC' Would you prefer to speak to an operator or try again with a new request?\n"); 
fprintf(lf, "<P>Your request was not understood.<LI>"); 

fprintf(lf, "Would you prefer to speak to an operator or try again with a new request?\n"); 
fflush(lf); 

fgets(query, 255, stdin); /* accept the user input */ 

addWord(&queryList, query, ++nuTnQueryList); 

fprintf(lf, "<?><!> %s</I>", query); 

num Words = breakStr(query, res Words); 

if ( inArray(resWords,"operator",num Words)) 

{ 

printf("\n\nPlease wait for the operator ...\n"); 

fprintf(lf,"<P>Please wait for the operator ..."); 

fflush(lf); 

exit(O); 

} 

if( inArray(resWords,"try",numWords) && inArray(resWords,"again",numWords)) 
{ 

system("clear"); 

printf("Please tell us your new request\n"); 
fprintf(lf, "<P>Please tell us your new request\n"); 
fflush(lf); 
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fgets(query, 255, stdin); /* accept the user input */ 
addWord(&queryList, query, -H-numQueryList); 

} 

return 1; 

} 

void sayOtherO 
{ 

printf("\nWould you like to hear other options?\n\n"); 
fprintf(lf, "<LI>Would you like to hear other options?<P>"); 
otheFlag = 1 ; 
} 

int checkscore(char *ans, int *Parray, int pent) 
{ 

char * resWords[50], *pmptWords[50]; 

int i, *score, *scorel; 

int num Words, nump Words, maxscore; 

score = (int *)malloc(pcnt * sizeof(int)); 
score 1 = (int *)malloc(pcnt * sizeof(int)); 
for (i - 0; i < pent; i++) 

score[i] = score l[i] = 0; 

num Words = breakStr(ans, resWords); 

for (i = 0;i<pcnt; i++) 

{ 

numpWords = breakStr(prompts[Parray[i]-l], pmptWords); 
for (j = 0; j < num Words; j++) 

if (inArray(pmptWords,resWords|j], numpWords)) 
score[i]++; 

} 

for (i = maxscore = 0; i < pent; i++) 

maxscore = (maxscore < score[i])?score[i]:maxscore; 
for (i = j = 0; i < pent; iH-+) 

j += (score[i] = maxscore)?! :0; 

if ( j = 1) /* single prompt selection */ 
{ 

for (i = 0;i<pcnt; iH-+) 

if (score[i] = maxscore) 
return i + 1 ; 

} 
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else 
{ 



for (i = 0; i < pent; i++) 
{ 

nump Words = breakStr(prompts[Parray[i] - 1], pmptWords); 

scorel[i] = getscorel (res Words, num Words, pmptWords, numpWords); 

} 

maxscore = 0; 

for (i = 0; i < pent; i++) 

maxscore = (scorel[i] > maxscore)?scorel[i]:maxscore; 
for (i = j = 0; i < pent; i-H-) 

j += (scorel [i] = maxscore)? 1 :0; 
if ( j = 1) /* single prompt selection */ 

{ 

for (i = 0;i<pcnt; i++) 

if (scorel [i] = maxscore) 
retum i + 1 ; 



} 

else 

{ 



for (i = 0; i < pent; i-H-) 

if(score[i] != maxscore) 

ParTay[i] = 0; 
retum -1; 



} 



int chkAfim( char * str) 
{ 

int ij, num Words; 
char * resWords[50]; 



num Words = breakStr(str, res Words); 
for (i = 0; i < num Words; i -H-) 

if (inArray(afjBrm Words, resWords[i], 3)) 
retum 1; 

retum 0; 

} 

int chkNegtn( char * str) 

{ 
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int i j, numWords; 
char * resWords[50]; 

numWords = breakStr(str, resWords); 
for (i = 0; i < numWords; i ++) 

if (inArray(negWords, resWords[i], 2)) 
return 1; 

return 0; 

} 

int getscorel(char **Wordl, int numl, char **Word2, int num2) 
{ 

intij, scr = 0; 
int Ismatch = 0; 

for(i = 0;i<numl;i++) 

^ forO = Ismatch; j < num2; j++) 

if(!strcmp(Wordl[i],Word2[j])) 

{ 

scr-H-; 
break; 

} 

if (j < num2) 

Ismatch =j + 1; 

} 

return scr; 

} 

int orderPrompts(int *InterPrompts,int numlnter) 
{ 

intij,k, 1; 

int *tmpArray[2]; /* 0 - score ; 1 - level; 3 - menu order */ 
int *tmpList, tmpCount; 

tmpArray[0] = (int *)malloc(numInter * sizeof(int)); 
tmpArray[l] = (int *)malloc(numInter * sizeof(int)); 

tmpList = (int *)malloc(numColunm * sizeof(int)); 
for(i = 0; i < numColumn; i++) 

tmpList[i] = 0; 
// get the list of keywords from queryTerms 
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tmpCount = getKeyWords(queryTerms, numQuery, tmpList); 
for (i = 0; i < numlnter; 

I* get the maxscore for the prompt */ 

tmpArray[0][i] = 0; . 
for (j = 0; (j < numScore) && (scoring[i][01 != InterPrompts[i]); j-H-); 

/* if any previous scoring present */ 

if ((j < numScore) && (scoringD][0] = InterPrompts[i])) 

{ 

// get the max score 

for ( k = 0; k < tmpCount; k++) 

tmpArray[0][i] = max(tmpArray[0][i] , scoring[j][tmpList[k]]); 

tmpArray[l][i] = getLevel(InterPrompts[i]); 

} 

// sort the array in order of score, level and menu-order 
for ( i = 0; i < (numlnter - 1); i++) 

for (j = i + 1 ; j < numbiter; ]++) 

if (!gThan(tmpArray[0][i], tmpArray[l][i], InterPrompts[i], 

tmpArray[0]Ij], tmpArray[l][j], InterPrompts[j])) 

swap(tmpArray[0][i], tmpArray[0][j]); 
swap(tmpArray[l][i], tmpArray[l ][]]); 
swap(InterPrompts[i],InterPrompts[j]); 

} 

} 

return numlnter; 

} 

int getKeyWords(char **queryTerms, int numQuery, int *tmpList) 
{ 

inti,j,k,l; 
int count = 0; 

for 0 = 0; j < numQuery; j-H-) 

/* Check if the word is keyword */ 

if ((k = inArray(columnTerms, querylermsU], numColunm)) != 0) 
{ 
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/* add in temp list only if not present */ 

for (i = 0; i < count && tmpList[i] != k ; 1++); 

if (i >= count) 

tmpList[count++] = k; 
continue; 

} 

/* check if the word is Thesaurus/Leamed Word */ 

if ((k = inArray(rowTerms, queryTenns[j], numRow)) != 0) 

^ /* pick-up all keywords for that word */ 
for (i = 0; thesaurus[k - l][i] != 0; 

^ for (1 = 0; 1< count && tmpList[l] != thesaurus[k - l][i] ; 1++); 
if (1 >= count) 

tmpList[count-H-] = thesaurus[k - l][i]; 



} 



} 



} 



return count; 
} 

int getLevel(int pmpt) 
{ 

int i, k, 1; 

for (i = 0; i < numMenu && menuList[i][l] != pmpt; i-H-); 
k = menuList[i][0]; 
for(l = 0;k>0;l++) 

^ for (i = 0; i < numMenu && menuList[i][l] != k; i++); 
k = menuList[i][0]; 

} 

return 1; 

} 

int gThan(int a, int b, int c, int p, int q, int r) 

^ if (a > p) return 1 ; // Desc order here 
if (a < p) return 0; // Desc order here 
if (b > q) return 0; // Asc order here 
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if (b < q) return 1 ; // Asc order here 
if (c > r) return 0; // Asc order here 
return 1; // Asc order here 

} 



for mlibx: This program contains functions for forms processing 
#include <stdio.h> 
#include <string.h> 
#include "arrayUb.h" 

struct input { 
char *Type; 
char * APrompt; 
char *RPrompt; 
char *Name; 
char *Value; 
char **Choice; 
int numChoice; 

}; 

Struct form { 
char * name; 
Struct input ** fields; 
int numFields; 

); 

char * split(char.* , char ); 

int loadForm(FILE *f, struct form *frm, char *name) 
{ 

intj, start=0; 
charbuf[512]; 
char fhame[20]; 

sprintf(fhame,"[%s]",name); 
fseek(f,SEEK_SET,0); 
while(fgets(buf,512,f) !=NULL) { 
j = strlen(buf); 

if (bufU - 1] = "Nn') bufD - 1] = 0; 
if (start) 
{ 
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if (strlen(buf) = 0) /* if blank line, stop reading */ 

break; 
frm->numFields++; 

frm->fields = (struct input **)realloc(frm->fields, (frm->numFields) * 

sizeof(struct input *)); . 

frm->fields[frm->numFields-l] = (struct input *)malloc(sizeof(struct input)); 

loadInput(fhn->fields[frm->numFields-l ], buf); 
} 



else 



if (!strcmp(fhame,buf)) { 

start = 1 ; 

frm->naine = strdup(name); 

frm->numFields=0; 

frm->fields=NULL; 

} 



} 

return start; 

} 



loadInput(struct input *inp, char * str) 
{ 

char ***list, *tmpstrl, *tmpstr2; 
int i, j, len; 

inp->Type = inp->APrompt = inp->RPronipt = inp->Name = inp->Value = NULL; 
list = (char ***)malloc(2 * sizeof(char **)); 
list[0] = (char **)malloc(2 * sizeof(char *)); 
list[l] = (char **)maUoc(2 * sizeofi[char *)); 
list[0][0] = str; 

for(i=0;(list[i+l][0] = split(Ust[i][0],':'))!=NULL;i++) 
{ 

list[i][l] = spHt(list[i][0];='); 

list = (char ***)realloc(list,(i+3)*sizeof(char**)); 

list[i+2] = (char **)malloc(2 * sizeof(char *)); 

} 

Iist[i][l] = split(list[i][0];='); 
len = i + 1 ; 
for(i=0; i <len;i++) 

{ 

if(!strcmp("TypeMist[i][0])) 

mystrcp(&inp->Type,list[i][l]); 
if(!strcmp("APrompt",Hst[i][0])) 

mystrcp(&inp->APrompt,list[i][l]); 
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if(!strcmp("RPromptMist[i][0])) 

mystrcp(&inp->RPrompt,list[i][l]); 
if(!strcmp("Name",list[i][0])) 

mystrcp(&inp->Naine,list[i] [ 1 ]); 
if (IstrcmpC ValueMist[i] [0])) 

mystrcp(&inp->Value,list[i][l]); 
if(!strcmp("Choice",list[i][0])) 

{ 

mystrcp(&tmpstrl, list[i][l]); 
tmpstr2 = tmpstrl; 
inp->Choice = NULL; 
inp->numChoice=0; 
for(j=0;tmpstrl|j]u++) 

{ 

if(tmpstrl[j]=V) 
{ 

tmpstrl[j]=0; 

inp->Choice = (char **)realloc(inp->Choice,(inp- 

>numChoice+l)*sizeof(char *)); 

inp->Choice[inp->numChoice-H-] = strdup(tmpstr2); 

allTrim(inp->Choice[inp->numChoice- 1 ]); 

tmpstr2=tmpstrl+j+l ; 

} 

inp->Choice = (char **)reaUoc(inp->Choice,(inp- 

>numChoice+l)*sizeof(char *)); 

inp->Choice[inp->nuinChoice++] = strdup(tmpstr2); 
allTrim(inp->Choice[inp->numChoice-l]); 

}. 

} 

} 

mystrcp(char **strl, char *str2) 
{ 

intlen, i, j; 

len = strlen(str2); 

if(str2[0]="" && str2[len-l]="") // i.e. quoted string; 

for (i = str2[-len] = 0; (str2[i] = str2[i + 1]); 1++); 
*strl = (strlen(str2)=0)?NULL:strdup(str2); 

} 

char * split(char * str, char dim) 
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{ 

int i; 

for(i = 0; str[i];i-H-) 

if(str[il=dlm) 

{ 

str[i] = 0; 
return str + i + 1; 

} 

return NULL; 
} 

acceptForm(struct form *frm) 
{ 

int i; 

char ans[256]; 
struct input cnfin; 

cnfm.Type = "MChoice"; 

cnfm.APrompt = strdup("Is this information correct?"); 
cnfin.numChoice - 4; 

cnfm.Choice = (char **)malloc(2 * sizeof(char *)); 
cnfm.Choice[0] =strdup("no"); 
cnfm.Choice[l] =strdup("yes"); 
cnfm.Choice[2] = strdup("right"); 
cnfm.Choice[3] = strdup("correct"); 
cnfm.Value = NULL; 

systemC'clear"); 
printf("\n"); 

for(i = 0; i<frm->numFields; 1++) 
{ 

if(!strcmp(frin->fields[i]->Type,"Say")) 

sayText(frm->fields[i]); 
if (frm->fields[i]->Value != NULL) 

continue; 

if(!strcmp(frm->fields[i]->Type,"AcceptResponse")) 

getText(frm->fields[i]); 
if (!strcmp(frm->fields[i]->Type,"MChoice")) 

getChoice(frm->fields[i]); 

} 

while (1) 

{ 

system("clear"); 
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printf("\n"); 

for(i = 0; i<frm->numFields; \++) 

if(!strcmp(frm->fields[i]->Type,"AcceptResponse")) 

sayText(frm->fields[i]); 
if(!strcmp(fnn->fields[i]->Type,"MChoice")) 

sayText(frm->fields[i]); 

} 

printf("\n"); 

getChoice(&cnfm); 

if (strcmp(cnfm.Value,"no")) 

return 1 ; 
system("clear"); 
printfC'W); 

for(i = 0; i<frm->numFields; 

if(!strcmp(frm->fields[i]->Type,"AcceptResponse")) 

getText(frm->fields[i]); 
if(!strcmp(fiin->fields[i]->Type,"MChoice")) 

getChoice(frm->fields[i]); 

} 

} 

} 

getText(struct input * inp) 
{ 

charbuf[256]; 

printf("\n%s\n\n",inp->APrompt); 

fgets(buf,255,stdin); 

allTrim(buf); 
inp->Value = strdup(buf); 

} 

sayText(struct input * inp) 
{ 

if {inp->RPrompt !=NULL) 

printf("%s",inp->RPrompt); 
if(inp->Value !=NULL) 

printf("%s",inp->Value); 
if (inp->RPrompt != NULL || inp->Value != NULL) 
printf(".\n"); 
} 
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fillForm(struct form * frm, char ** Array, int arrCount) 
{ 

int i, j, wrdCount = 0, tmpCount = 0; 

char **wordList - NULL; 

char *tmparray[50]; 

for(i = 0; i < arrCount; i-H-) 

{ 

tmpCount = breakStr(Array[i], tmparray); 

wrdCount = mergeArray(&wordList,tmparray, wrdCount, tmpCount); 
} 

wrdCount = process Array(wordList, wrdCount, 1); 
for(i = 0; i < frm->numFields; i-H-) 

if(!strcmp(frm->fields[i]->Type,"MChoice")) 

selectValue(fnn->fields[i], wordList, wrdCount); 

} 

int selectValue(struct input * inp, char **array, int arrCount) 
{ 

int i, j, *score; 

char *tmparray[20] ; 

int max, maxcount, tmpCount; 

score = (int *) malloc(inp->numChoice * sizeof(int)); 
for (i = 0; i < inp->numChoice; i++) 

{ 

score[i] = 0; 

tmpCount = breakStr(inp->Choice[i], tmparray); 

if (tmpCount > 1) // Basically to avoid filtering of 'yes', W etc 

filterStopWords(tmparray, tmpCount); 
tmpCount = processArray(tmparray, tmpCount, 0); 
forG = 0; j < tmpCount; j-Hf) 

if (inArray(array, tmparray[j], arrCount)) 
score[i]-H-; 

} 

for(i = max = 0; i < inp->numChoice; 1++) 

if (score[i] > max) max = score[i]; 
for(i = maxcount = 0; i < inp->numChoice; i++) 

if (score[i] = max) maxcount-H-; 
if (maxcount != 1) 

return 0; 

for(i = 0; i < inp->numChoice; 1++) 
if (score[i] = max) 

{ 
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inp->Value = strdup(inp->Choice[i]); 

break; 

} 

return 1; 

} 

processForm (struct form *frm) 

{ 

intij; 

char *formType = NULL, *formAction = NULL; 
for(i = 0; i<frm->numFields; i++) 

if (fnn->fields[i]->Value = NULL) 
continue; 

if (! strcmp(frm->fields[i]->Type,"FormType")) 

formType = strdup(fnn->fields[i]->Value); 

if (! strcmp(frm->fields[i]->Type,"FonnAction")) 

fomiAction = strdup(frm->fields[i]->Value); 

} 

// If not defined the form type use 'AcceptFrom' as default. 
if(fonnType = NULL) 

formType = strdup("AcceptForm"); 

if(!strcmp(formType,"AcceptForm")) 
j = acceptForm(fnn); 

if (! strcmp(formType,"ResponseForm")) 
j = responseForm(frm); 

if (j != 0 && formAction != NULL) 

perfomiAction(fhn, formAction); 

) 

responseForm(struct form *fhn) 

{ 

inti; 

systemC'clear"); 

printf(["\n"); 

for (i = 0; i < frm->numFields; 
{ 
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if(strcmp("Say",frin->fields[i]->Type)) 

continue; 
sayText(fim->fields[i]); 

} 

printf("\n"); 
} 

getChoice(struct input * inp) 
{ 

charbuft256], *tmparray[50]; 
int tmpCount; 

while (1) 
{ 

printf("\n%s\n\n", inp->APrompt); 

fgets(buf,255,stdin); 

tmpCount = breakStr(buf, tmparray); 

if (tmpCount > 1) // Basically to avoid filtering of 'yes', 'no' etc 

filterStopWords(tmparray, tmpCount); 
tmpCount = processArray(tmparray, tmpCount, 0); 
if (selectValue(inp, tmparray, tmpCount)) 
return; 

} 

} 

performAction(struct form *fnn, char *action) 
{ 

struct form f; 
char * cmd = NULL; 
char buf [256]; 
inti,j,lenl,len2; 
FILE *pd; 

sprintf(buf, "%s «EOD\n", action); 

cmd = strdup(buf); 

for (i = 0; i < fnn->numFields; 

{ 

if (frm->fields[i]->Name = NULL) 

continue; , 
sprintfl[buf,"%s=%c%s%c\n'',frm->fields[i]->Name,'''',fhn->fields[i]->Value, ); 

lenl = strlen(buf); 
len2 = strlen(cmd); 

cmd = (char *) realloc(cmd, (lenl + len2 + 1) * sizeof(char)); 
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strcat(cmd, buf); 
} 

sprintf(buf,"EOD\n"); 
lenl = strlen(buf); 
len2 = strlen(cnid); 

cmd = (char *) realloc(cmd, (lenl + len2 + 1) * sizeof(char)); 
strcat(cmd, buf); 

if ((pd = popen(cmd, "r")) = NULL) 
{ 

fyrintf(stderr, "Error in command executionNn"); 
exit(I); 

} 

f.name = NULL; 
f.numFields = 0; 

f.fields = NULL; 

while ((fgets(buf, 255, pd)!= NULL)) 
{ 

j = strlen(buf); 

if(buflj- l] = '\n') buf[j- 1] = 0; 

if (strlen(buf) = 0) /* if blank line, stop reading */ 

continue; 
fnumFields-H-; 

f fields = (struct input **)realloc(f fields, (f numFields) * sizeof(struct input *)); 
f fields[fnumFields-l] = (struct input *)malloc(sizeof(struct input)); 
loadInput(ffields[f.numFields-l],buf); 
} 

pclose(pd); 
processFomi(&f); 

} 



HEADER FILES (C) 

globalvar.h: Header file for global variables 

extern FILE *webDoc, *phoneDoc; 

extern int numColumn, numRow, numlndex, numMenu; 

extern int startPoint, eofPlag, top Values; 

extern char **rowTenns, **columnTerms, **prompts, **stopWords; 

extern double **matrix, **cosine; 

float phoneThreshoId, webThreshold; 

extern int **indexList, **menuList, **thesaurus; 
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extern int numStopWord, numOrgRow; 

void stemArray(char **list, int arrayLen); 

extern int numForms, numPF; 

int stemWord(char *); 

extern char ***Fprompts; 

extern int numPorms, numPF; 

extern struct form **formlist; 



proc ess,h: Header file declaring functions in processx 

* Process. Ill * 

int processFile(char *filename, char ***cArray, float threshold); 
void loadStopWords( char * filename) ; 
// int allTrim( char *str); 
void fiUIndexO; 

void updateThesaurus( char *str, int pmpt); 

void createMatrix(char * filename); 

//intreadPara(FILE*fp); 

// int wordshiPara (FILE *fp); 

void calcCosineQ; 

int eraseZeroesQ; 

void createThesaurusQ; 

// void floatSort(int *colnum, float *tmpcos, int numRov^); 
void saveData(char *filenm); 



arraylib.h: Header file declaring functions in arraylib.c 

/******************************************** 

* ArrayLib.h * 

int fetchWord(FILE *f, char * wrd); 

int inArray(char **array, char *word, int length); 

int removeNulls(char **strarray, int num Words); 

int mergeArray(char ***Arrayl, char **Array2, int numArrayl, int numArray2); 

int readValues(char *str, char **array); 

void sortArray(char *allwords[], int numwords); 

int loadPrompts(char *filename); 

void loadStopWords(char *); 
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FILE * fileOpen( char *filename, char *mode); 

void addWord(char *** cArray, char * word, int c); 

int breakStr(char * str, char **strarray); 

void filterStopWords(char ** strarray, int num Words); 

void filterDupUcates(char ** strarray, int numWords); 

int loadFonnsList( char *filename); 

int loadForms(char * filename); 

int allTrim( char *str); 

int createArray(char *, char **); 

int processArray( char **, int, int); 



f orm5.h; Header file declaring functions in formlib.c 

#include <stdio.h> 

extern struct input { 
char *Type; 
char *APrompt; 
char *RPrompt; 
char *Name; 
char *Value; 
char **Choice; 
int numChoice; 
}a; 

extern struct form { 
char * name; 
struct input **fields; 
int numFields; 
}b; 

char * split(char * , char ); 

int loadForm(FILE *, struct form *, char *); 

void loadInput(struct input *, char * ); 
void mystrcp(char **, char *); 
void dumpInput(FILE *, struct input *); 
void dumpForm(FILE *, struct form *); 
void acceptFomi(struct form *); 
void getText(struct input * ); 

void fillForm(struct form * frm, char ** Array, int arrCount); 
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MAKE FILE 

makefile: Makefile for compiling the source code. 

all: t d demorun 

t: main.o process.o arraylib.o stemlib.o formlib.o 

cc -g main.o process.o arraylib.o stemlib.o formlib.o -o t -Im 
d: dialog.o interactive.© arraylib.o stemlib.o formlib.o 

cc -g dialog.o interactive.© arraylib.o stemlib.o formlib.o -o d 
demorun: demorun.c 

cc demorun.c -o demorun 
main.o: main.c process.h arraylib.h forms.h 

cc -c -g main.c 
process.o: process.c globalvar.h forms.h 

cc -c -g process.c 
arraylib.o: arraylib.c globalvar.h 

cc -c -g arraylib.c 
dialog.o: dialog.c arraylib.h 

cc -c -g dialog.c 
interactive.©: interactive.c globalvar.h 

cc -c -g interactive.c 
stemlib.o: stemlib.c 

cc -c -g stemlib.c 
formlib.o: formlib.c 

cc -c -g formlib.c 

clean: 

rm -f *.o t d core demorun 
bkup: clean 

tar cvzf ../stemMate "+%d%m"\tgz . 



PARAMETER FILES 

Li ni: This file contains parameters required for program \' 
pdoc p # phonedoc 
wdoc w # webdoc 
sdoc s # stopwords 
fdoc f # forms 

xdoc X # link of forms & prompts 
cfg z.cfg # config file 
pt 0.02 # phoneThreshold 
wt 0.0006 # webThreshold 
tv 5 # top Values for cosine 
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dJni: This file contains parameters required for program 'd' 

cfg t.cfg # config file 

Icfg l.cfg # learn file 

sdoc s # stopwords 

fdoc f # forms 

xdoc X # X 

minprompt 2 # minimum no of prompts 
timeout 30 # timeout sees for other options 



DATA FILES 

p; Document 'p* 

Are you calling about subscriptions? 

Would you like to order a subscription? 

Would you like to pay your subscription fees? 

Would you like to give a gift subscription? 

Would you like to change your address or change any other information? 
Do you have any billing enquiries or concerns? 

Would you like information about your account balance or your payments? 

Would you like to speak to a customer care representative? 
Would you like to temporarily suspend your delivery? 
Is there a problem with your paper or delivery? 
Did you miss todays paper? 

Did you miss yesterday's newspaper and would you like credit for yesterday? 
Did you receive a wet paper? 
Would you like information about the New Herald website? 

Would you like to obtain your New Herald website password? 

The website address is www.newherald.com. Would you like any other information about 
the website? 

Are you calling about advertisements? 

Would you like to advertise in the New Herald? 
Is it a classified ad? 

Is it a fiill-page, half-page, or quarter-page ad? 
Would you like to place an ad? 
Is it a classified ad? 

Is it a full-page, half-page, or quarter-page ad? 
Are you calling about something else? 

Would you like to write to the New Herald? 

Would you like to submit an article to the op-ed page? 

Please email your article to oped@newherald.com. 
Would you like to send a letter to the editor? 
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Please email your letter to letters@newherald.com. 
Would you like to work for the New Herald? 

Would you like to write for the New Herald? 

Would you like to work for the editorial division or for the administeative 

division? 



w : Document 'w' 

Now it's easier than ever to manage your Herald. Welcome to The New Herald Subscnption & 
Customer Care Web site. You expect all the news that's fit to print in each issue of The New 
Herald And you can expect responsive, round-the-clock on-line customer care that allows you to 
review and update your delivery and billing information, stop delivery of your newspaper when 
you're away, discover special promotions and notify us of any questions or comments you have. 
And if you're not a subscriber, browse our Web site and consider subscribing to home delivery. 
Please enjoy your visit. 

With convenient home delivery, you will be sure to receive all the wit, the wisdom, the news, the 
views offered in every issue of The New Herald. And, through this special offer, you will get 
50% off the regular rate for the first eight weeks. To subscribe enter your ZIP code below and 
submit. 

ZIP Code: 

Expect the World Around the Clock 

We are pleased to offer our subscribers instant, 24-hour on-line customer care to meet your 
service needs. Now, it's easier than ever to order home delivery, review your bill, or change your 
service ~ and to find out about special customer benefits and promotions. 

Take Our Survey 

Help us provide you with the highest quahty customer service. This short survey asks for vital 
information about you and your service needs. The New Herald may perform statistical analysis 
of reader interests to identify ways to improve our services and products to better meet the needs 
of our subscribers. Personal information about you as an individual subscriber will not be 
provided to any third party. Our privacy policy is posted online to disclose our guidelines for the 
use of customer information. 

You can handle most of your subscription service requests online, including: 
* Suspending your delivery while you're away 
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* Reporting missed deliveries 

* Checking the status of your account 

* Checking your billing history 

* Changing your delivery or billing address 

* Changing your method of payment 
To subscribe 

Customer care: 
Account Sununary 
Update Account 
Activity History 
Billing History 
Paper not received 
Suspend delivery 
Complaints 

Order Home Delivery at 50% Off (US Customers Only) 

With convenient home delivery, you can start each day with all the news, the views, the wit and 
the wisdom you expect from The New Herald. And, through this special offer, you can save 50% 
on the first eight weeks when you order today. If s a smart, easy way to keep up with The Herald. 

This offer expires December 31, 2001 and is valid in areas served by The New Herald' delivery 
service. Subscribers who have had Herald home delivery within the past 90 days are not eligible 
for this introductory offer. To subscribe enter your ZIP code below and submit. 

GIFT SUBSCRIPTION OFFER 

There's no present like The Herald. And, when you order a gift subscription of 12-week home 
delivery of The New Herald, youll save 50% on the regular rate. Hurry. This offer expires 
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December 31, 2001. To order, enter the ZIP code of the gift recipient below and submit. 
Order Home Delivery at 50% Off (US Customers Only) 

With convenient home delivery, you can start each day with all the news, the views, the wit and 
the wisdom you expect from The New Herald. And, through this special offer, you can save 50% 
on the first eight weeks when you order today. It's a smart, easy way to keep up with The Herald. 

This offer expires December 31, 2001 and is valid in areas served by The New Herald' delivery 
service. Subscribers who have had Herald home delivery within the past 90 days are not ehgible 
for this introductory offer. To subscribe enter your ZIP code below and submit. 

ZIP Code: 

GIFT SUBSCRIPTION OFFER 

There's no present like The Herald. And, when you order a gift subscription of 12-week home 
delivery of The New Herald, you'll save 50% on the regular rate. Hurry. This offer expires 
December 31, 2001. To order, enter the ZIP code of the gift recipient below and submit. 

ZIP Code: 

LARGE TYPE WEEKLY 

Developed especially for people with low vision. The New Herald Large Type Weekly offers a 
select package of the week's news printed in 16-point type-about twice the size of the regular 
type size. With its updated, color-enhanced design. The Large Type Weekly is a striking-and 
cleariy readable way to enjoy The New Herald. A mail subscription of The New Herald Large 
Type Weekly makes a great gift for yourself or someone you care for. 

To order, select a country/region below and submit. 

Order Home Delivery at 50% Off (US Customers Only) 

With convenient home delivery, you can start each day with all the news, the views, the wit and 
the wisdom you expect from The New Herald. And, through this special offer, you can save 50% 
on the first eight weeks when you order today. It's a smart, easy way to keep up with The Herald. 

This offer expires December 31, 2001 and is valid in areas served by The New Herald' delivery 
service. Subscribers who have had Herald home delivery within the past 90 days are not ehgible 
for this introductory offer. To subscribe enter your ZIP code below and submit. 
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ZIP Code: 

GIFT SUBSCRIPTION OFFER 

There's no present like The Herald. And, when you order a gift subscription of 12-week home 
delivery of The New Herald, you'll save 50% on the regular rate. Hurry. This offer expires 
December 31, 2001. To order, enter the ZIP code of the gift recipient below and submit. 

ZIP Code: 

LARGE TYPE WEEKLY 

Developed especially for people with low vision. The New Herald Large Type Weekly offers a 
select package of the week's news printed in 16-point type-about twice the size of the regular 
type size. With its updated, color-enhanced design, The Large Type Weekly is a stnking--and 
clearly readable way to enjoy The New Herald. A mail subscription of The New Herald Large 
Type Weekly makes a great gift for yourself or someone you care for. 

To order, select a country/region below and submit. 
Country: 

The New Herald Book Review 



Get a head start on the latest book reviews, the acclaimed New Herald Best Sellers lists and 
everything new and noteworthy in the literary world. When you order a mail subscnption to 
New Herald Sunday Book Review, you'll receive it days in advance of the Sunday New Hei 

To order, select a country/region below and submit. 



Country: 

To Subscribe - Foreign Mail Subscriptions 

Stay informed with all the news in the United States and throughout the world, including sharp 
analyses, reports and reviews from the world of business, sports and the arts. Discermng readers 
across the country and around the globe depend on The Herald for inside revelations, outside 
opinions, all sides of the story. Now you can too ~ with the convenience of home delivery by 
mail. Order now. 

To change your address, method of billing or any of the account information featured below, 
please enter the updated information in the appropriate box. Once you have completed all 
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information requested, please click Submit at the bottom of the page. (Please note: It is necessary 
for all bold fields to be filled out to process your updated information.) 

Your billing and payment history provides an at-a-glance summary of your account and makes it 
simple to check on your balance, last payment and new charges. Recent invoices are listed below 
for your review. Questions may be submitted to our customer care billing representatives by 
going to the Complaints page. Please be sure to indicate Billing Inquiry as the nature of your 
complaint. 

Did you miss a paper? The New Herald is committed to making sure you get every issue you've 
ordered. If you did not receive your paper or any of its sections, simply select one of the 
following redelivery options so that we may deliver one to you. 

Please note: Only same day redelivery is available on-line; you must submit this information on 
the same day on which your paper or section was to be delivered. For credits on past issues, 
please phone our customer care representatives at 1(800) 555-9876. 

I would like to have today's paper delivered tomorrow. Please credit my account for today's 
missed paper. 

Did you miss a paper? The New Herald is committed to making sure you get every issue you've 
ordered. If you did not receive your paper or any of its sections, simply select one of the 
following redelivery options so that we may deliver one to you. 

Please note: Only same day redelivery is available on-line; you must submit this information on 
the same day on which your paper or section was to be delivered. For credits on past issues, 
please phone our customer care representatives at 1(800) 555-9876. 

PAPER NOT RECEIVED 

I did not receive today's paper. 

ACCOUNT NUMBER: 060095544 

Reason: 

Select One: I would like to have today's paper delivered tomorrow. 
Please credit my accoimt for today's missed paper. 
SECTIONS NOT RECEIVED 
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I received today's paper with the section(s) checked below missing 
Sections not received: ARTS & LEISURE BUSINESS 

DINING IN/OUT MAIN NEWS SEC 

METROPOLITAN SPORTS 
Select One: I would like to have today's paper delivered tomorrow. 
Please credit my account for today's missed paper. 

As a newspaper home delivery subscriber, you may suspend your service for any amount of 
time. When you suspend your home delivery service, you may elect to take part m our vacation 
donation program (see description below). Please indicate your suspension 



and restart dates below: 



ACCOUNT NUMBER: 060095544 



SUSPEND/RESUME 



Suspend: 
Resume: 



Vacation Donation Program 

During your next vacation, sit back, relax -- and at the same time enrich your community. 
Through The New Herald Newspaper in Education program, you can donate your subscription 
students for the time period in which you will be out of town. For each copy you donate, at leas 
two students will receive their own copy of The New Herald. To donate your vacation copies, 
please indicate below. 

Choose One: Donate the vacation period papers to local schools through the Newspapers in 
Education program. Credit my account for the period of my vacation. SUSPEND/RESUME 2 



Suspend: 
Resume: 
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Choose One: Donate the vacation period papers to local «<^hools through the Newspa^ 
Education program. Credit my account for the period of my vacation. SUSPEND/RESUME 3 

Suspend: 
Resume: 

Choose One: Donate the vacation period papers to local schools through the Newspapers in 
Education program. Credit my account for the period of my vacation. 

To best provide you with responsive, accessible customer service, we encourage your comments 
and suggestions. Please let us know about any dissatisfaction you may have with your delivery or 
billing service. Customers who have not received a paper can order another paper or receive 
credit for today by clicking here. 

For all other subscription concerns, please use the form below to send us an email indicating the 
nature of your complaint and explaining how we may help you. A customer care representative 
will respond to your request within 24 hours to the email address provided on this form. 
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f: Document 'f . 

[FORMl] 

Type="FormType" : Value=" AcceptForm" 

Type="AcceptResponse":Name="AcctNo":APrompt="Please tell us your account 
number.":Value="":RPrompt="Your account number is " 

Type="AcceptResponse":Name="date":APrompt="When would you like to start suspendmg the 
paper?" :Value="":RPrompt="The delivery will stop on " 

Type="MChoice":Name="Duration":APrompt="Would you like to suspend the paper for one 
month, two months, or three months?":Choice="one month.two months,three 
months":Value="":RPrompt="The delivery will be suspended for " 
Type="FormAction" : Value=" ./susp_deli" 

[F0RM2] 

Type="FormType":Value="AcceptFomi" 

Type="AcceptResponse":Name="Name":APrompt="Please tell us your 
name.":Value="":RPrompt="Your name is " 

Type="AcceptResponse":Name="Address":APrompt="What city do you live 
in?":Value="":RPrompt="You live in " 

Type="MChoice":Name="SubType":APrompt="Would you like the newspaper daily or just the 
Sunday paper?" :Value="":Choice="a daily newspaper,the Sunday newspaper":RPrompt="You 
have opted for " 

Type="MChoice":Name="SubPrd":APrompt="Would you like a half-yearly or annual 
subscription?" :Value="":Choice="a half-yearly subscription,an annual 
subscription":RPrompt="You have chosen " 
Type="FormAction":Value="./add_acct" 

[F0RM3] 

Type="FormType":Value=" AcceptForm" 

Type="AcceptResponse":Name="AcctNo":APrompt="What is your account 
number?" :Value="":RPrompt="Your account number is " 
Type="FormAction":Value="./acct_info" 

[F0RM4] 

T>pe="FormType":Value=" AcceptForm" 

Type="AcceptResponse":Name="AcctNo":APrompt="What is your account 
number?":Value="":RPrompt="Your account number is " 
Type="FomiAction":Value="./get__pymt" 

[FORMS] 

Type="FormType":Value=" AcceptForm" 

Type="AcceptResponse":Name="Name":APrompt="Whom would you like to gift the 
subscription to?":Value="":RPrompt="You are gifting this subscription to " 
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Type="AcceptResponse":Name="Address":APrompt="In which city does the person 
Hve?":Value="":RPrompt="The person lives in " 

Type="MChoice":Name="SubType":APrompt="Would you like to give a daily newspaper or 
just the Sunday paper?":Value="":Choice="a daily newspaper.the Sunday 
newspaper":RPrompt="You have opted for " 

Type="MChoice":Name="SubPrd":APrompt=" Would you like a half-yearly or annual 
subscription?":Value="":Choice="a half-yearly subscription,an annual 
subscription" :RPrompt=" You have chosen " 
Type="FormAction":Value="./add_acct" 

[F0RM6] 

Type="FormType":Value="AcceptForm" 

Type="AcceptResponse":Name="AcctNo":APrompt="What is your account 
number?" :Value="":RPrompt=" Your account number is " 

Type="MChoice":Name="preference":APrompt="Would you like the newspaper or would you 
prefer credit for it?":Value="":Choice="the newspaper,credit":RPrompt="You prefer " 
Type- 'FormAction":Value=" ./prefer" 

[F0RM7] 

Type="FormType":Value="AcceptForm" 

Type="AcceptResponse":Name="AcctNo":APrompt="What is your account 
number?" :Value="":RPrompt=" Your account number is " 
Type="Hidden":Name="preference":Value="credit" 
Type="FormAction":Value=" ./prefer" 

[FORMS] 

Type="FonnType":Value="AcceptForm" 

Type="AcceptResponse":Name="AcctNo":APrompt="What is your account 
number?" :Value="":RPrompt=" Your account number is " 
Type="FormAction":Value="./chg_acct" 



x: Document 'x' 

FORMl :Would you like to temporarily suspend your delivery? 
FORM2:Would you like to order a subscription? 

F0RM3: Would you like information about your account balance or your payments? 
FORM4:Would you like to pay your subscription fees? 
FORMS: Would you like to give a gift subscription? 
F0RM6:Did you miss today's paper? 
F0RM6:Did you receive a wet paper? 

F0RM7:Did you miss yesterday's newspaper and would you like credit for yesterday? 
FORMS: Would you like to change your address or change any other information? 
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a: Datafile 'a' contains data about subscription 

1 1 1 1210 1 -01 -20021365 13 1 5 101 -01 -2002|50|||Frege|Jena 

2|2|2|01-02-2002|52|32|01-02-2002|20|||Russell|Cambridge 

3|2|2|01-02-2002|52|32|01-02-2002|20|||Wittgenstein|Vienna 

4|1 12101-04-2002|364|3 14|01-04-2002|50|||Austin|Oxford 

5|l|2|01-05-2002|365|264|01-05-2002|100|||Grice|Berkeley 

6| 1 11 101-06-20021 1 80|49|01 -06-20021 1 3011|Parikh|New York 



CONnGURATION FILES 

t.c fg: Thesaurus configuration file. This is generated by program 't' 

[PROMPTS] 

Are you calling about subscriptions? 
Would you like to order a subscription? 
Would you like to pay your subscription fees? 
Would you like to give a gift subscription? 

Would you like to change your address or change any other information? 
Do you have any billing enquiries or concerns? 

Would you like information about your account balance or your payments? 
Would you like to speak to a customer care representative? 
Would you like to temporarily suspend your delivery? 
Is there a problem with your paper or delivery? 

Did you miss today's paper? 

Did you miss yesterday's newspaper and would you like credit for yesterday? 
Did you receive a wet paper? 

Vv^ould you like information about the New Herald website? 
Would you like to obtain your New Herald website password? 

The website address is www.newherald.com. Would you like any other information about 
website? 

Are you calling about advertisements? 
Would you like to advertise in the New Herald? 
Is it a classified ad? 

Is it a fiill-page, half-page, or quarter-page ad? 

Would you like to place an ad? 

Are you calling about something else? 

Would you like to write to the New Herald? 

Would you like to submit an article to the op-ed page? 

Please email your article to oped@newherald.com. 

Would you like to send a letter to the editor? 

Please email your letter to letters@newherald.com. 

Would you like to work for the New Herald? 
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Would you like to write for the New Herald? 

Would you like to work for the editorial division or for the administrative division? 

[MENUTREE] 

0,1,0 

1,2,99 

1,3,99 

1.4,99 

1,5,99 

1,6,0 

6,7,99 

6,8,99 

1,9,99 

0,10,0 

10,11,99 

10,12,99 

10,13,99 

0,14,0 

14,15,99 

14,16,99 

0,17,0 

17,18,0 

18,19,99 

18,20,99 

17,21,0 

21,19,99 

21,20,99 

0,22,0 

22,23,0 

23,24,25 

24,25,100 

23,26,27 

26,27,100 

22,28,0 

28,29,99 

28,30,99 

[INDEX] 
account 7, 

ad 19,20,21, 
address 5,16, 
administr 30, 
advertis 17,18, 
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annual 2,4, 
articl 24,25, 
balanc 7, 
bill 6, 

call 1,17,22, 
care 8, 
chang 5, 
classifi 19, 
com 16,25,27, 
concern 6, 
credit 12,11,13, 
custom 8, 
daili 2,4, 
deliveri 9,10, 
divis 30, 
ed 24, 
editor 26, 
editori 30, 
els 22, 
email 25,27, 
enquiri 6, 
fee 3, 
full 20, 
gift 4, 
give 4, 
half 20,2,4, 
inform 5,7,14,16, 
letter 26,27, 
miss 11,12, 
month 9, 

newspap 12,2,4,11,13, 

nytim 16,25,27, 

obtain 15, 

on 9, 

op 24,25, 

order 2, 

pai 3, 

password 15, 
payment 7, 
place 21, 
problem 10, 
quarter 20, 
receiv 13, 
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repres 8, 
send 26, 
someth 22, 
submit 24, 
subscript 1,2,3,4, 
sundai 2,4, 
suspend 9, 
temporarili 9, 
three 9, 
todai 11, 
two 9, 

websit 14,15,16, 
wet 13, 
work 28,30, 
write 23,29, 
www 16, 
yearli 2,4, 
yesterdai 12, 

[THESAURUS] 
access 58,41,48,19, 
acclaim 54,48,53,41, 
account 16,36,39,34, 
address 12,9,15,50,25, 
advanc 54,48,53,41, 
allow 11,17,9,32, 
amount 55,36,19, 
analys 19,41,32,52, 
analysi 32,17,49, 
anoth 58,41,48,19, 
appropri 12,3,9,32, 
ask 32,17,49, 
back 59,48,36,53, 
balanc 44,49,1 1,9, 
benefit 9,12,17,19, 
better 32,17,49, 
bill 12,3,44, 
bold 12,3,9,32, 
bottom 12,3,9,32, 
box 12,3,9,32, 
brows 11,17,9,32, 
care 49,17,8,32, 
Chang 9,3,44,19, 
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charg 8,44,49,1 1,9, 
commun 59,48,36,53, 
complet 12,3,9,32, 
concern 50,25,49,1 1,3, 
consid 11,17,9,32, 
credit 1,36,34,39,58, 
custom 11,49,32, 
deliveri 41,52, 
depend 19,41,32,52, 
descript 55,36,19, 
discern 19,41,32,52, 
disclos 32,17,49, 
discov 11,17,9,32, 
dissatisfact 58,41,48,19, 
elect 55,36,19, 
email 15,50,49,3,11,17, 
encourag 58,41,48,19, 
enrich 59,48,36,53, 
explain 15,50,25,49,11,3, 
featur 12,3,9,32, 
field 12,3,9,32, 
fill 12,3,9,32, 
find 9,12,17,19, 
fit 11,17,9,32, 
foreign 53,29,59,54, 
gift 53,41,52,19, 
glanc 8,44,49,1 1,9, 
globe 19,41,32,52, 
guidelin 32,17,49, 
handl 53,29,59,54, 
head 54,48,53,41, 
highest 32,17,49, 
identifi 32,17,49, 
improv 32,17,49, 
mdividu 32,17,49, 
inform 17,49,11, 
inquiri 8,44,49,11,9, 
insid 19,41,32,52, 
instant 9,12,17,19, 
interest 32,17,49, 
invoic 8,44,49,11,9, 
last 8,44,49,11,9, 
latest 54,48,53,41, 
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least 59,48,36,53, 
leisur 48,59,54,34,58, 
let 58,41,48,19, 
literari 54,48,53,41, 
manag 11,17,9,32, 
miss 58,16,39,1,48, 
most 53,29,59,54, 
necessari 12,3,9,32, 
newspap 16,55,39,1, 
next 59,48,36,53, 
noteworthi 54,48,53,41, 
notifi 11,17,9,32, 
on 36,16,34,1,58, 
one 12,3,9,32, 
opinion 19,41,32,52, 
order 19,52,29, 
outsid 19,41,32,52, 
own 59,48,36,53, 
part 55,36,19, 
parti 32,17,49, 
payment 8,9,12,49,11, 
perform 32,17,49, 
person 32,17,49, 
pleas 9,12,17,19, 
polici 32,17,49, 
post 32,17,49, 
privaci 32,17,49, 
process 12,3,9,32, 
product 32,17,49, 
qualiti 32,17,49, 
receiv 34,59, 
recent 8,44,49,11,9, 
relax 59,48,36,53, 
repres 11,17,8,15,50,32, 
respond 15,50,25,49,11,3, 
revel 19,41,32,52, 
round 11,17,9,32, 
see 55,36,19, 
seller 54,48,53,41, 
send 15,25,49,11,3, 
sharp 19,41,32,52, 
short 32,17,49, 
side 19,41,32,52, 
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simpl 8,44,49,11,9. 
sit 59,48,36,53, 
stai 19,41,32,52, 
state 19,41,32,52, 
statist 32,17,49, 
statu 1,16,8,36, 
stop 11,17,9,32, 
stori 19,41,32,52, 
submit 19,41,49,11,17, 
subscript 29,11, 
suggest 58,41,48,19, 
sundai 48,53,41,59, 
suspend 36,39,16,19, 
suspens 55,36,19, 
third 32,17,49, 
throughout 19,41,32,52, 
todai 34,16,48,41, 
town 59,48,36,53, 
two 48,36,53, 
unit 19,41,32,52, 
visit 11,17,9,32, 
vital 32,17,49, 
welcom 11,17,9,32, 



I.cfg: Thesaurus learn file, newly learned meanings are stored in this file 

[EXT-THESAURUS] 

2Ao!w^5lo,0,0,0,0,0,0,0,0,0,0,4,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, 

0,8,0,0,0,0,0,0,0,0,0,0,0,0,0, ^ ^ ^ 

13,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0.0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,2,0,0, 

0,0,0,0,0.0.0,0,0,0,6,0,0,0,0,0, 



SHELL SCRIPTS FOR DATA MANIPULATION 

acctj nfo: Script to extract account information from 'a' into a Response form 
#!/bin/sh 

acctno='cut -d'=' -f 2 | sed sA7/g' 
#echo Sacctno 
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cnt=^grep -c '"^Sacctnol" a' 

if[$cnt-eqO] 

then 

echo 'Type="FonnType":Value="ResponseFonn"' 

echo 'Type="Say":RPrompt="Sorry, the account number you provided does not 

exist":Value="'" 
exitO 

fi 

line=^ grep "^Sacctno]" a 

echo'Type="FormType":Value="ResponseForm'" 

name=^ echo $hne | cut -d' |' -f 1 T 

echo 'Type="Say":RPrompt="Your last name is ":Value="'$name"" 
city='echo $line | cut -d'l' -f 12' 

echo Type="Say":RPrompt="You live in ":Value="'$city"" 
sub_type='echo Sline | cut -d'f -f 2' 
if [$sub_type -eq 1 ] 
then 

sub_type="a daily newspaper" 

else 

subjype- 'the Sunday newspaper" 

echo •Type="Say":RPrompt="You have subscribed for ":Value="'$sub_type"" 

sub_prd='echo Sline 1 cut -d'l' -f 3' 

sdate='echo Sline | cut -d'l' -f 4' 

if [Ssub_prd-eq 1 ] 

then 

sub_prd="six months" 

else 

sub j3rd="one year" 

echo •Type="Say":RPrompt="The subscription starts on 'Ssdate' for a period of 
":Value="'$sub_prd"" 

fee='echo Sline | cut -d'|' -f 5' 

echo Type="Say":RPrompt="The subscription fee is S":Value-"'$fee"" 
bal= echo Sline I cut -dT -f6^ 

echo Type="Say":RPrompt="Your balance is S":Value="*Sbal"" 
pdate='echo Sline | cut -d'l' -f 7' 

pymt='echo Sline | cut -d'l' -f 8' ,,,, 
echo Type="Say":RPrompt="Your last payment was S'Spymf on ":Value- ipdate 

sudate='echo Sline 1 cut -d'f -f 9' 
if["X$sudate"!="X") 
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then 

suprd='echo Sline | cut -d'l' -f 10' 
case $suprd in 

1) suprd="one month";; 

2) suprd="two months";; 

3) suprd- 'three months";; 
esac 

echo 'Type="Say":RPrompt="Your account is suspended from 'Ssudate' for 
":Value="'$suprd"" 
fi 



add acct: Script to add new account into 'a' 

#!/bin/sh 

# arrange all the values of input into a single line 
cp /dev/null /tmp/param 

cut-d'=' -f 2 I sed "sA"//g 
s/ AWWW /g" I while read aa 
do 

echo -n $aa' ' » /tmp/param 

done 

echo "" »/tmp/param 

# now transfer them into env variables. 

read NAME CITY SUB_T YPE SUB_PRD < /tmp/param 

if [ "$SUB_TYPE" = "a daily newspaper" ] 

then 

SUB_TYPE=1 
FEE=182 

else 

SUB_TYPE=2 
FEE=26 

fi 

if [ "$SUB_PRD" = "a half-yearly subscription" ] 
then 

SUB_PRD=1 

else 

SIJB_PRD=2 
FEE=expr$FEE\*r 

fi 

cnt=l 
while true 
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do 

if [ "'grep -c V"^$cnt|\" a " -ne 0 ] 
then 

cnt='expr Sent + r 
continue 

fi 

echo $cntT$SUB_TYPET$SUB_PRDTMate +%d-%m- 
%Y'"|$FEE|$FEE||0|||$NAME|$CITY" » a 

echo Type="FormType":Value="AcceptForm'" 

echo 'Type="Say":RPrompt=" Your subscription request has been entered" : Value-""* 
echo 'Type="Say":Name="acct_no":RPrompt="Your account number is ":Value="'$cnt"" 
echo 'Type="Say":RPrompt="Your fee for the subscription is $":Value="'$FEE"" 
echo Type="AcceptResponse":Name="payment":APrompt="Your minimum initial 

payment is $25. How much would you like to pay now?":Value="":RPrompt="You have chosen 

to pay $"• 

echo 'Type="FormAction":Value="./updt_pymt"' 
break 

done 

#nn /tmp/param 



chg acct: Script to generate a form to change account information 

#!/bin/sh 

acctno=^cut -d'=' -f 2 1 sed sA"//g" 
#echo Sacctno 
cnt='grep -c '"^Sacctnoj" a' 
if [$cnt-eqO] 
then 

echo •Type="FormType" -.Value- 'ResponseForm'" 

echo Type="Say":RPrompt="Sorry, the account number you provided does not 
exist" :Value=""' 
exitO 

fi 

line= grep "'^Sacctnoj" a' 

echo Type="FormType" : Value=" AcceptForm"' 

echo Type="Hidden":Name="acctno" : Value='$acctno"" 

# Response info 

name='echo $line | cut -d'|' -f 1 T 

echo Type="Say":RPrompt="Your last name is ":Value="'$name"" 
city='echo $line | cut -d'j' -f 12' 

echo •Type="Say":RPrompt="You live in ":Value="'$city'"' 
sub_type='echo $line | cut -d'j' -f 2' 
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if[$sub_type -eq 1 ] 
then 

sub_type="a daily newspaper" 

else 

sub_type="the Sunday newspaper" 

echo 'Type="Say":RPrompt="You have subscribed for ":Value="'$sub_type"" 

sub_prd=^echo $line | cut -d'l* -f 3' 

sdate=^echo $line | cut -d'l' -f 4' 

if[$sub_prd-eq 1 ] 

then 

subjprd-'six months" 

else 

sub_prd="one year" 

fi . ^ ^ 

echo 'Type="Say":RPrompt="The subscription starts on 'Ssdate' for a penod of 

":Value-"'$sub_prd"" 
fee='echo Sline | cut -d'l' -f 5^ 

echo •Type="Say":RPrompt="The subscription fee is $":Value="'$fee"" 
bal=^echo Sline | cut -d'l' -f 6^ 

echo •Type="Say":RPrompt="Your balance is $":Value="'$bal"" 
pdate='echo Sline | cut -d'j' -f 7' 
pymt='echo Sline | cut -d'j' -f 8' 

echo 'Type="Say":RPrompt="Your last payment was S'Spymt' on ":Value="'$pdate"" 
sudate=^echo Sline j cut -d'j' -f 9' 
if [ "XSsudate" !="X"] 
then 

suprd='echo Sline | cut -d'f -f 10' 
case Ssuprd in 

1) suprd="one month";; 

2) suprd="two months";; 

3) suprd="three months";; 
esac 

echo 'Type="Say":RPrompt="Your account is suspended from 'Ssudate' for 
":Value='"$suprd"" 
fi 

# 

echo Type="AcceptResponse":Name="Name":APrompt="What name would you like to 
use?":Value="":RPrompt="The name you would like to use is '" 

echo 'Type="AcceptResponse":Name="Address":APrompt="What city would you like the 
newspaper sent to?":Value="":RPrompt="The city you would like the newspaper sent to is 
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echo •Type="MChoice":Name="SubType":APrompt=" Would you like the newspaper daily or 
just the Sunday paper?":Value="":Choice="a daily newspaper,the Sunday 
newspaper" :RPrompt=" You have opted for '" 

echo Type="MChoice":Name="SubPrd":APrompt="Would you like a half-yearly or annual 
subscription?":Value="":Choice="a half-yearly subscription,an annual 
subscription" :RPrompt=" You have chosen "* 
echo Type="FormAction" : Value="./updt_acct"' 



get pymt; Script to generate a form to accept payment for a particular account 

#!/bin/sh 

acctno=^cut -d'=' -f 2 | sed sA7/g' 

#echo Sacctno 

cnt='grep -c "-^Sacctnol" a' 

if[$cnt-eqO] 

then 

echo 'Type="FormType" : Value="ResponseForm"' 

echo 'Type="Say":RPrompt="Sorry, the account number you provided does not 
exist" :Value=""' 
exitO 

fl 

line=' grep "'^Sacctnol" a' 

fee='echo $line | cut -d'l' -f 5^ 
bal=^echo $line j cut -d'j' -f 6' 
pdate='echo Sline | cut -d'|' -f 7' 
pymt=^echo Sline | cut -d']' -f 8' 
if[$bal-leO] 
then 

echoType="FonnType":Value="ResponseForm"' 

else 

echo'Type="FormType":Value="AcceptForm"' 

ti 

echo Type="Say":RPrompt="The subscription fee is $" : Value="'$fee"" 

echo 'Type="Say":RPrompt="Your last payment was $'$pymt' on":Value="'$pdate"" 

echo •Type="Say":RPrompt="Your balance is $":Value="'$bar"' 

if[$bal-neO] 

then 

echoType="Hidden":Name="acctno":Value="'$acctno"" 

echo 'Type="AcceptResponse":Name="payment":APrompt="How much would you like 
to pay now?":Value="":RPrompt="You have paid $"' 
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echoType="FormAction":Value="./updt_pymt' 

fl 



u pdt_pymt; Script to update the data file 'a' using form information 

#!/bin/sh 

cp /dev/nuU /tmp/paraml 
cut-d'=' -f21sed"sA7/g 
s/ AWWW /g" 1 while read aa 
do 

echo -n $aa' ' » /tmp/paraml 

done 

echo "" »/tmp/paraml 

read acctno payment < /tmp/paraml 

touch /tmp/tmpa 

echo "no" > /tmp/found 

cat a I while read line 

do 

cacno='echo Sline | cut -d'|' -f T 
if [ Scacno -eq Sacctno ] 
then 

echo "yes" > /tmp/found 

echo -n $cacno'|' » /tmp/tmpa 

echo -n 'echo Sline | cut -d'f -f 2'T » /tmp/tmpa 

echo -n 'echo Sline | cut -dT -f 3 T » /tmp/tmpa 

echo -n 'echo Sline | cut -d'j' -f 4"|' » /tmp/tmpa 

echo -n 'echo Sline | cut -d'j' -f 5"!' » /tmp/tmpa 

bal='echo Sline | cut -d'l' -f 6' 

bal='expr Sbal - Spayment' 

echo -n Sbal'l' » /tmp/tmpa 

echo -n 'date +%d-%m-%Y'T » /tmp/tmpa 

echo -n Spayment']' » /tmp/tmpa 

echo -n 'echo Sline | cut -d'l' -f 9"|' » /tmp/tmpa 

echo -n 'echo Sline j cut -dT -f lO'T » /tmp/tmpa 

echo -n 'echo Sline | cut -d'j' -f 1 1'T » /tmp/tmpa 

echo 'echo Sline | cut -d'|' -f 12' » /tmp/tmpa 

else 

echo Sline » /tmp/tmpa 

fi 

done 

mv /tmp/tmpa a 
read ans < /tmp/foimd 
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if [ "Sans" = "yes"] 
then 

echo Type="FormType":Value="ResponseForm"' 

echo •Type="Say":RPrompt="Thank you for the subscription":Value=""' 

else 

echo Type="FormType" : Value="ResponseForm"' 

echo 'Type="Say":RPrompt="Sorry, the account number you provided does not 
exist":Value= 
fl 

rm/tmp/paraml /tmp/found 



susp_deli: Script to suspend delivery for a particular account 
#!^in/sh 

cp /dev/nuU /tmp/paraml 
cut-d'='-f21sed"sA7/g 
s/ AWWW /g" I while read aa 
do 

echo -n $aa' ' » /tmp/paraml 

done 

echo »/tmp/paraml 

read acctno sdate period < /tmp/paraml 

if [ "Speriod" = "one month" ] 

then 

period=l 

fl 

if [ "Speriod" = "two month" ] 
then 

period=2 

fl 

if [ "Speriod" = "three months" ] 
then 

period=3 

fl 

echo "no" > /tmp/found 
touch /tmp/tmpa 
cat a I while read line 
do 

cacno='echo Sline | cut -d'|' -f T 
if [ Scacno -eq Sacctno ] 
then 

echo "yes" > /tmp/found 
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echo -n $cacnoT » /tmp/tmpa 
echo -n echo $line | cut -d'l' -f 2"r » /tmp/tmpa 
echo -n 'echo $Une | cut -d'l' -{T'\' » /tmp/tmpa 
echo -n echo $Une | cut -d'l' -f 4''!' » /tmp/tmpa 
echo -n 'echo Sline | cut -d'l' -f S"!' » /tmp/tmpa 
echo -n 'echo $line \ cut -d'j' -f 6"|' » /tmp/tmpa 
echo -n 'echo Sline | cut -d'l' -f 7"!' » /tmp/tmpa 
echo -n 'echo $Une | cut -d'l' -f 8"|' » /tmp/tmpa 
echo -n Ssdate'f » /tmp/tmpa 
echo -n Speriod'j' » /tmp/tmpa 
echo -n 'echo Sline | cut -d'l' -f U"|' » /tmp/tmpa 
echo 'echo Sline | cut -d'j' -f 12' » /tmp/tmpa 

else 

echo Sline » /tmp/tmpa 

fi 

done 

mv /tmp/tmpa a 
read ans < /tmp/found 
if[ "Sans" = "yes"] 
then 

echo 'Type="FormType":Value="ResponseForm"' 

echo •Type="Say":RPrompt="Thank you. The information has been updated": Value-" 

else 

echo 'Type="FormType":Value="ResponseForm"' 

echo 'Type="Say":RPrompt="Sorry, the account number you provided does not 
exist":Value= 
fi 

rm /tmp/paraml /tmp/found 



updt_acct: Script to update data file 'a' with changed information 

#!./bin/sh 

# arrange all the values of input into a single line 

cp /dev/nuU /tmp/param 

cut-d'='-f2|sed"sA'V/g 

s/ AWWW /g" I while read aa 

do 

echo -n $aa' ' » /tmp/param 

done 

echo "" »/tmp/param 
cp /dev/null /tmp/tmpa 

144 

728851 vl 



PATENT 
Docket No,: 4428-4001 

read acctno name city subjype sub_prd < /tmp/param 

cat a I while read line 

do 

cacno='echo $line | cut -d'|' -f T 
if [ Scacno -eq $acctno ] 
then 

echo -n Scacno*!' » /tmp/tmpa 

if [ "$sub Jype" = "a daily newspaper" ] 

then 

sub_type=l 
newfee=182 

else 

sub_type=2 
newfee=26 

fl 

echo -n $sub_type'|' » /tmp/tmpa 

if [ "$subj)rd" = "a half-yearly subscription" ] 

then 

sub_prd=l 

else 

sub_prd=2 

newfee='expr Snewfee \* 2' 

fl 

echo -n $sub_prd'|' » /tmp/tmpa 

echo -n ^echo Sline | cut -d^ -f 4^7 » /tmp/tmpa 

echo -n SnewfeeY » /tmp/tmpa 

oldfee=^echo Sline | cut -dT -f 5^ 

oldbal=^echo Sline | cut -d'r -f 6^ 

newbal='expr Snewfee - Soldfee + Soldbaf 

echo Snewfee' 'Snewbal > /tmp/newbal 

if[$newbal-gtO] 

then 

echo -n Snewbal| » /tmp/tmpa 

else 

echo -n '0|' » /tmp/tmpa 

fl 

#echo -n Mate -\-Vod-Vom'%T'\' » /tmp/tmpa 
echo -n ^echo Sline | cut -dT -f 7^T » /tmp/tmpa 
echo -n ^echo Sline j cut -d'l' -f 8^T » /tmp/tmpa 
echo -n ^echo Sline | cut -d'j* -f 9^i' » /tmp/tmpa 
echo -n ^echo Sline | cut -d'j' -f 10"r » /tmp/tmpa 
echo -n SnameT » /tmp/tmpa 
echo Scity » /tmp/tmpa 
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else 

echo $line » /tmp/tmpa 

fi 

done 

mv /tmp/tmpa a 

echo'Type="FormType":Value="ResponseForm"* 
read newfee newbal < /tmp/newbal 

echo 'Type="Say":RPrompt="Your fee for the subscription is $":Value='"$newfee"" 

if[$newbal-ltO] 

then 

newbal='expr $newbal \* -V 

echo •Type="Say":RPrompt="A cheque of S'Snewbal' will be sent to you to compensate 
for excess balance'" 
else 

echo 'Type="Say":RPrompt=" Your balance is $":Value="'$newbal"" 

fi 

echo Type="Say":RPrompt="Thank you":Value=""' 
rm /tmp/param /tmp/newbal 



prefer: Script to generate form for damaged / missing newspaper complaint 

#!/bin/sh 

cp /dev/nuU /tmp/param 1 
cut-d'='-f2|sed"sA7/g 
s/A\\\\\\/g" I while read aa 
do 

echo -n $aa' ' » /tmp/param 1 

done 

echo "" »/tmp/paraml 

read acctno preference < /tmp/param 1 

cnt='grep -c '"^Sacctnof a' 

if[$cnt-eqO] 

then 

echo Type="FormType" : Value="ResponseForm'" 

echo 'Type="Say":RPrompt="Sorry, the account number you provided does not 
exist":Value="'" 
exitO 

fi 

if [ "Spreference" = "the newspaper" ] 
then 

echoType="FormType":Value="ResponseForm"' 
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echo 'Type="Say":RPrompt="You will be sent today'V's newspaper":Value=""' 

echo Type="Say":RPrompt="Thank you":Value= 

exitO 

fi 

touch /tmp/tmpa 
cat a I while read line 
do 

cacno='echo $line | cut -d'|' -f T 
if [ $cacno -eq Sacctno ] 
then 

echo "yes" > /tmp/found 

echo -n Scacno'f » /tmp/tmpa 

echo -n 'echo $line | cut -dT -f 2'T » /tmp/tmpa 

echo -n ^echo $line | cut -dT -f 3"j' » /tmp/tmpa 

echo -n 'echo $line | cut -d'j' -f 4"|' » /tmp/tmpa 

echo -n 'echo $line \ cut -d'|' -f 5"|' » /tmp/tmpa 

bal='echo $line | cut -dT -f 6' 

bal='expr $bal - V 

echo -n "Sbal]" » /tmp/tmpa 

echo -n 'echo $line | cut -dT -f 7'T » /tmp/tmpa 

echo -n 'echo Sline | cut -d'j' -f 8"!' » /tmp/tmpa 

echo -n $sdateT » /tmp/tmpa 

echo Speriod » /tmp/tmpa 

else 

echo Sline » /tmp/tmpa 

fi 

done 

mv /tmp/tmpa a 

echo 'Type="FonnType" : Value="ResponseForm"' 

echo 'Type="Say":RPrompt="Your account has been credited" :Value=""* 

echo 'Type="Say":RPrompt="Thank you":Value=""' 

rm /tmp/paraml /tmp/found 
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